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

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

diff --git a/ghc/tests/lib/should_run/text001.hs b/ghc/tests/lib/should_run/text001.hs
deleted file mode 100644 (file)
index 18aab82..0000000
--- a/ghc/tests/lib/should_run/text001.hs
+++ /dev/null
@@ -1,15 +0,0 @@
-{-     Bug report 28 May 99
-
-When compiled with ghc-4.02, everything's fine, it outputs "Value 7" as
-expected. But compiled with ghc-pre-4.03 it yields this error message.
-
-   Fail: Prelude.read: no parse
--}
-
-module Main where
-
-data Msg = Value Int | Inc   deriving (Show, Read)
-  
-main = do let v = read "Value 7"::Msg
-          print v
-