[commit: packages/filepath] master: Move the generator (ee6451a)

git at git.haskell.org git at git.haskell.org
Thu Mar 19 11:36:01 UTC 2015


Repository : ssh://git@git.haskell.org/filepath

On branch  : master
Link       : http://git.haskell.org/packages/filepath.git/commitdiff/ee6451a2892b2c3c1184795109c73d5b8ad67de1

>---------------------------------------------------------------

commit ee6451a2892b2c3c1184795109c73d5b8ad67de1
Author: Neil Mitchell <ndmitchell at gmail.com>
Date:   Wed Oct 29 07:31:51 2014 +0000

    Move the generator


>---------------------------------------------------------------

ee6451a2892b2c3c1184795109c73d5b8ad67de1
 .ghci                            | 2 +-
 tests/GenTests.hs => Generate.hs | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/.ghci b/.ghci
index 6676709..dc49947 100644
--- a/.ghci
+++ b/.ghci
@@ -7,4 +7,4 @@ import qualified System.FilePath.Posix as Posix
 :def docs_ const $ return $ unlines [":!cabal haddock"]
 :def docs const $ return $ unlines [":docs_",":!start dist\\doc\\html\\filepath\\System-FilePath.html"]
 
-:def test const $ return $ unlines [":!cd tests && runhaskell GenTests.hs",":!cabal test"]
+:def test const $ return $ unlines [":!runhaskell Generate.hs",":!cabal test"]
diff --git a/tests/GenTests.hs b/Generate.hs
old mode 100644
new mode 100755
similarity index 95%
rename from tests/GenTests.hs
rename to Generate.hs
index 722ffc0..53ec8c6
--- a/tests/GenTests.hs
+++ b/Generate.hs
@@ -14,9 +14,9 @@ isExpr (Expr{}) = True
 isExpr _ = False
 
 
-main = do src <- readFile "../System/FilePath/Internal.hs"
+main = do src <- readFile "System/FilePath/Internal.hs"
           let tests = concatMap getTest $ zip [1..] (lines src)
-          writeFile "FilePath_Test.hs" (prefix ++ genTests tests)
+          writeFile "tests/FilePath_Test.hs" (prefix ++ genTests tests)
 
 prefix = unlines
     ["import AutoTest"



More information about the ghc-commits mailing list