Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/2de7870f00f84ded1cb6edf6a2bc42cde0f4351c >--------------------------------------------------------------- commit 2de7870f00f84ded1cb6edf6a2bc42cde0f4351c Author: Ian Lynagh <[email protected]> Date: Sat Nov 19 22:27:15 2011 +0000 Move testsuite/tests/lib/Show to base/tests >--------------------------------------------------------------- tests/lib/Show/Makefile | 3 -- tests/lib/Show/all.T | 2 - tests/lib/Show/showDouble.hs | 41 -------------------------------------- tests/lib/Show/showDouble.stdout | 22 -------------------- 4 files changed, 0 insertions(+), 68 deletions(-) diff --git a/tests/lib/Show/Makefile b/tests/lib/Show/Makefile deleted file mode 100644 index 9101fbd..0000000 --- a/tests/lib/Show/Makefile +++ /dev/null @@ -1,3 +0,0 @@ -TOP=../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk diff --git a/tests/lib/Show/all.T b/tests/lib/Show/all.T deleted file mode 100644 index 0e98a0e..0000000 --- a/tests/lib/Show/all.T +++ /dev/null @@ -1,2 +0,0 @@ -test('showDouble', normal, compile_and_run, ['']) - diff --git a/tests/lib/Show/showDouble.hs b/tests/lib/Show/showDouble.hs deleted file mode 100644 index 399af28..0000000 --- a/tests/lib/Show/showDouble.hs +++ /dev/null @@ -1,41 +0,0 @@ - -module Main (main) where - -main :: IO () -main = do let xs = [p0, p01, p3, p31, n0, n01, n3, n31, pinf, ninf, nan] - mapM_ print xs - mapM_ (print . Just) xs - -p0 :: Double -p0 = 0 - -p01 :: Double -p01 = 0.1 - -p3 :: Double -p3 = 3 - -p31 :: Double -p31 = 3.1 - -n0 :: Double -n0 = -0 - -n01 :: Double -n01 = -0.1 - -n3 :: Double -n3 = -3 - -n31 :: Double -n31 = -3.1 - -pinf :: Double -pinf = 1 / 0 - -ninf :: Double -ninf = - 1 / 0 - -nan :: Double -nan = 0 / 0 - diff --git a/tests/lib/Show/showDouble.stdout b/tests/lib/Show/showDouble.stdout deleted file mode 100644 index fb1b4de..0000000 --- a/tests/lib/Show/showDouble.stdout +++ /dev/null @@ -1,22 +0,0 @@ -0.0 -0.1 -3.0 -3.1 --0.0 --0.1 --3.0 --3.1 -Infinity --Infinity -NaN -Just 0.0 -Just 0.1 -Just 3.0 -Just 3.1 -Just (-0.0) -Just (-0.1) -Just (-3.0) -Just (-3.1) -Just Infinity -Just (-Infinity) -Just NaN _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
