From 9c0a3c516d9b0b51977ed4baecd1005d46c5ed94 Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Tue, 8 Jul 2014 17:18:40 +0300
Subject: [PATCH] Turn off idle GC for yesod devel #767

---
 yesod-bin/Devel.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/yesod-bin/Devel.hs b/yesod-bin/Devel.hs
index 77f34286..075d49c4 100644
--- a/yesod-bin/Devel.hs
+++ b/yesod-bin/Devel.hs
@@ -258,7 +258,7 @@ devel opts passThroughArgs = withSocketsDo $ withManager $ \manager -> do
            list <- liftIO $ getFileList hsSourceDirs [cabal]
            success <- liftIO rebuild
            pkgArgs <- liftIO (ghcPackageArgs opts)
-           let devArgs = pkgArgs ++ ["devel.hs"]
+           let devArgs = pkgArgs ++ ["+RTS", "-I0", "-RTS", "devel.hs"]
            let loop list0 = do
                    (haskellFileChanged, list1) <- liftIO $
                        watchForChanges filesModified hsSourceDirs [cabal] list0 (eventTimeout opts)