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

[ghc-hetmet.git] / ghc / tests / programs / north_array / Main.hs

diff --git a/ghc/tests/programs/north_array/Main.hs b/ghc/tests/programs/north_array/Main.hs
deleted file mode 100644 (file)
index 049d8bf..0000000
--- a/ghc/tests/programs/north_array/Main.hs
+++ /dev/null
@@ -1,10 +0,0 @@
-import Array -- 1.3
-
-val1, val2 :: Array (Int,Int) Int
-val1 = array ((1,2), (2,1)) []
-val2 = array ((2,1), (1,2)) []
- 
-val3 :: Array Integer Double
-val3 = array (4, -3) []
-
-main = print ((val1 == val1) && (val2 == val2) && (val3 == val3))