Comment exécuter la commande sh à l'aide de Shake

Question

Je suis en train de migrer un makefile existant Shake et jusqu'à présent, je l'ai essayé ce qui suit (il suffit de créer un fichier avec le contenu d'un répertoire)

module Main where 
import Development.Shake 

main :: IO() 
main = shakeArgs shakeOptions{shakeFiles="_build"} $ do 
    let ls = "_build/ls.txt" 
    want [ls] 
    ls *> \out -> do 
     cmd "ls > " out 

Quand je exécutez-le, j'obtiens le message d'erreur suivant:

> runghc test.hs _build/ls.txt 
# ls (for _build/ls.txt) 
ls: >: No such file or directory 
ls: _build/ls.txt: No such file or directory 
Error when running Shake build system: 
* _build/ls.txt 
Development.Shake.cmd, system command failed 
Command: ls > _build/ls.txt 
Exit code: 1 
Stderr: 
ls: >: No such file or directory 
ls: _build/ls.txt: No such file or directory 

Qu'est-ce que je fais mal? Comment exécutez-vous une commande sh et redirigez sa sortie?

Answer 1

Pour commencer par la conversion que vous voulez sans doute:

cmd Shell "ls >" out 

L'argument Shell dit Shake pour utiliser le shell système, ce qui signifie les travaux de redirection. Par la suite, vous voudrez peut-être passer à:

Stdout result <- cmd "ls" 
writeFile' out result 

Maintenant, vous n'êtes pas Invoquer le shell, mais la capture de la sortie avec Shake. Quelque temps plus tard, vous voudrez peut-être passer à:

getDirectoryFiles "." ["*"] 

Ce qui est Shake suivi façon d'obtenir une liste de fichiers.