[project @ 2001-08-22 12:24:41 by simonmar]

[ghc-hetmet.git] / ghc / tests / numeric / should_run / arith007.hs

diff --git a/ghc/tests/numeric/should_run/arith007.hs b/ghc/tests/numeric/should_run/arith007.hs
deleted file mode 100644 (file)
index 3d42d1f..0000000
--- a/ghc/tests/numeric/should_run/arith007.hs
+++ /dev/null
@@ -1,23 +0,0 @@
--- !!! test simple Integer things
---
-
-f x y z = x y z
-
-main = do
-  putStr (shows integer_list "\n")
- where
-    int_list :: [Int]
-    integer_list :: [Integer]
-
-    int_list = (map fromInteger integer_list)
-
-    integer_list = (map (* 2)
-       [1,3,5,7,9,
-        11111111111111111111111111111,
-        2222222222222222222222222222222222222,
-        3333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333,
-        -11111111111111111111111111111,
-        -2222222222222222222222222222222222222,
-        -3333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333
-       ])
-