Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/76fd9aa1d5604c7002358851e16da13f436c1d4e >--------------------------------------------------------------- commit 76fd9aa1d5604c7002358851e16da13f436c1d4e Author: Ian Lynagh <[email protected]> Date: Sat Nov 19 23:23:10 2011 +0000 Move Data.List tests to base/tests >--------------------------------------------------------------- tests/lib/Data.List/Makefile | 3 --- tests/lib/Data.List/all.T | 2 -- tests/lib/Data.List/genericNegative001.hs | 8 -------- tests/lib/Data.List/genericNegative001.stdout | 3 --- tests/lib/Data.List/take001.hs | 5 ----- tests/lib/Data.List/take001.stdout | 1 - 6 files changed, 0 insertions(+), 22 deletions(-) diff --git a/tests/lib/Data.List/Makefile b/tests/lib/Data.List/Makefile deleted file mode 100644 index 9101fbd..0000000 --- a/tests/lib/Data.List/Makefile +++ /dev/null @@ -1,3 +0,0 @@ -TOP=../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk diff --git a/tests/lib/Data.List/all.T b/tests/lib/Data.List/all.T deleted file mode 100644 index 1257348..0000000 --- a/tests/lib/Data.List/all.T +++ /dev/null @@ -1,2 +0,0 @@ -test('take001', extra_run_opts('1'), compile_and_run, ['']) -test('genericNegative001', extra_run_opts('-1'), compile_and_run, ['']) \ No newline at end of file diff --git a/tests/lib/Data.List/genericNegative001.hs b/tests/lib/Data.List/genericNegative001.hs deleted file mode 100644 index f59a42f..0000000 --- a/tests/lib/Data.List/genericNegative001.hs +++ /dev/null @@ -1,8 +0,0 @@ --- Test for http://hackage.haskell.org/trac/ghc/ticket/2533 -import System.Environment -import Data.List -main = do - (n:_) <- getArgs - print (genericTake (read n) "none taken") - print (genericDrop (read n) "none dropped") - print (genericSplitAt (read n) "none split") diff --git a/tests/lib/Data.List/genericNegative001.stdout b/tests/lib/Data.List/genericNegative001.stdout deleted file mode 100644 index b8a0907..0000000 --- a/tests/lib/Data.List/genericNegative001.stdout +++ /dev/null @@ -1,3 +0,0 @@ -"" -"none dropped" -("","none split") diff --git a/tests/lib/Data.List/take001.hs b/tests/lib/Data.List/take001.hs deleted file mode 100644 index a7a5314..0000000 --- a/tests/lib/Data.List/take001.hs +++ /dev/null @@ -1,5 +0,0 @@ --- Test for bug #1219, F/B rule for take was too strict -import System.Environment -main = do - (n:_) <- getArgs - print (map (const 'x') (take (read n) (undefined:undefined))) diff --git a/tests/lib/Data.List/take001.stdout b/tests/lib/Data.List/take001.stdout deleted file mode 100644 index 92232f6..0000000 --- a/tests/lib/Data.List/take001.stdout +++ /dev/null @@ -1 +0,0 @@ -"x" _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
