Écrire dans plusieurs fichiers dans Haskell

Question

Dans Haskell, comment écrire sur un nombre de fichiers arbitrairement grand?

À titre d'exemple, disons que je veux prendre les lettres a à z et les mettre dans des fichiers nommés pour la lettre de leur contenu. Une première tentative a été de faire ce qui suit:

main :: IO() 
main = do 
     let letter = map (:"") ['a'..'z'] 
     zipWith writeFile letter letter 

qui a produit l'erreur suivante:

Couldn't match expected type 'IO()' with actual type '[IO()]'

Je me sens comme il devrait y avoir un moyen de boucle à travers une liste dans un bloc do, mais je havre de paix pas pu le trouver encore.

Answer 1

La fonction dont vous avez besoin est zipWithM.

Re. way to loop through a list in a do block, il ya aussi une fonction pour cela - sequence, de sorte que vous pouvez écrire sequence $ zipWith writeFile letter letter.