add a type signature in GF.Interactive2 to make ghc-7.6.3 happy

2015-08-21 11:58:32 +00:00
parent 026d6a73ad
commit d1b46ece28
1 changed files with 1 additions and 0 deletions
--- a/src/compiler/GF/Interactive2.hs
+++ b/src/compiler/GF/Interactive2.hs
@@ -166,6 +166,7 @@ execute1' s0 =
      do execute . lines =<< lift (restricted (readFile w))
         continue
      where
+        execute :: [String] -> ShellM ()
        execute [] = done
        execute (line:lines) = whenM (execute1' line) (execute lines)