From d1b46ece28522845379d4b0eb382e561a1dc221d Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Fri, 21 Aug 2015 11:58:32 +0000
Subject: [PATCH] add a type signature in GF.Interactive2 to make ghc-7.6.3
 happy

---
 src/compiler/GF/Interactive2.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/compiler/GF/Interactive2.hs b/src/compiler/GF/Interactive2.hs
index bfa7fd6b2..d023f47e4 100644
--- 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)