diff --git a/ghci-wrapper/src/Language/Haskell/GhciWrapper.hs b/ghci-wrapper/src/Language/Haskell/GhciWrapper.hs
index 7797daec..564a28a5 100644
--- a/ghci-wrapper/src/Language/Haskell/GhciWrapper.hs
+++ b/ghci-wrapper/src/Language/Haskell/GhciWrapper.hs
@@ -88,6 +88,7 @@ close repl = do
   -- around consuming 100% CPU.  This happens when ghci tries to print
   -- something to stdout in its signal handler (e.g. when it is blocked in
   -- threadDelay it writes "Interrupted." on SIGINT).
+  terminateProcess $ process repl
   e <- waitForProcess $ process repl
   hClose $ hOut repl