From ca5a30b3f7024ddc036eab2173539824fddcfd8b Mon Sep 17 00:00:00 2001
From: bjorn <bjorn@bringert.net>
Date: Thu, 14 Aug 2008 15:25:05 +0000
Subject: [PATCH] Print gf commands in Make.hs for debugging purposes.

---
 lib/resource/Make.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/resource/Make.hs b/lib/resource/Make.hs
index b5573b96a..9d42e1e3f 100644
--- a/lib/resource/Make.hs
+++ b/lib/resource/Make.hs
@@ -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