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

[ghc-hetmet.git] / ghc / tests / array / should_run / arr006.hs

diff --git a/ghc/tests/array/should_run/arr006.hs b/ghc/tests/array/should_run/arr006.hs
deleted file mode 100644 (file)
index 8aa1ddd..0000000
--- a/ghc/tests/array/should_run/arr006.hs
+++ /dev/null
@@ -1,11 +0,0 @@
--- !!! Array - empty arrays
--- 
--- print a couple of them to try to expose empty arrays 
--- to a GC or two.
-import Array
-
-main =
- let 
-  a1 = array (1,0) []
- in
- print (take 300 $ repeat (a1 :: Array Int Int))