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

[ghc-hetmet.git] / ghc / tests / lib / should_run / stableptr003.hs

diff --git a/ghc/tests/lib/should_run/stableptr003.hs b/ghc/tests/lib/should_run/stableptr003.hs
deleted file mode 100644 (file)
index ec3cfa8..0000000
--- a/ghc/tests/lib/should_run/stableptr003.hs
+++ /dev/null
@@ -1,10 +0,0 @@
-module Main where
-
-import Stable
-
-main = do
-  stable_list1 <- mapM makeStableName list
-  stable_list2 <- mapM makeStableName list
-  print (stable_list1 == stable_list2)
-
-list = [1..10000] :: [Integer]