Print gf commands in Make.hs for debugging purposes.

This commit is contained in:
bjorn
2008-08-14 15:25:05 +00:00
parent 0caebe9092
commit ca5a30b3f7

View File

@@ -121,7 +121,9 @@ gfc pres ppath file = do
gf comm file = do
putStrLn $ "Reading " ++ file
system $ "echo \"" ++ comm ++ "\" | gf -s " ++ file
let cmd = "echo \"" ++ comm ++ "\" | gf -s " ++ file
putStrLn cmd
system cmd
treeb abstr ls = "rf -lines -tree -file=" ++ treebankExx ++
" | l -treebank " ++ unlexer abstr ls ++ " | wf -file=" ++ treebankResults