#57, send some blank lines to ghci first (or perhaps to something lik…

…e stack)
ndmitchell · Apr 25, 2016 · 339e1a9 · 339e1a9
1 parent e2b801d
commit 339e1a9
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/Language/Haskell/Ghcid.hs b/src/Language/Haskell/Ghcid.hs
@@ -53,6 +53,10 @@ startGhci cmd directory echo0 = do
     hSetBuffering err LineBuffering
     hSetBuffering inp LineBuffering
 
+    -- Some programs (e.g. stack) might use stdin before starting ghci (see #57)
+    -- Send them some empty lines
+    replicateM 3 $ hPutStrLn inp ""
+
     -- I'd like the GHCi prompt to go away, but that's not possible, so I set it to a special
     -- string and filter that out.
     let ghcid_prefix = "#~GHCID-START~#"