Support :go taking a numeric argument
authorNeil Mitchell <ndmitchell@gmail.com>
Mon, 3 Nov 2014 15:49:50 +0000 (15:49 +0000)
committerNeil Mitchell <ndmitchell@gmail.com>
Mon, 3 Nov 2014 15:49:50 +0000 (15:49 +0000)
.ghci

diff --git a/.ghci b/.ghci
index c05f736..6e8b1b3 100644 (file)
--- a/.ghci
+++ b/.ghci
@@ -9,5 +9,5 @@ import qualified System.FilePath.Posix as P
 
 :def gen const $ return "Generate.main"
 :def test \x -> return $ if null x then "Test.main" else "System.Environment.withArgs [" ++ show x ++ "] Test.main"
-:def go const $ return $ unlines [":reload",":gen",":reload",":test",":gen",":reload"]
+:def go \x -> return $ unlines [":reload",":gen",":reload",":test " ++ x,":gen",":reload"]
 :def testfull const $ return $ unlines [":reload","gen",":reload","!cabal test"]