[project @ 2001-05-18 14:18:34 by simonmar]

[ghc-hetmet.git] / ghc / tests / io / should_run / io007.hs

diff --git a/ghc/tests/io/should_run/io007.hs b/ghc/tests/io/should_run/io007.hs
index 467382f..0cd2f7e 100644 (file)
--- a/ghc/tests/io/should_run/io007.hs
+++ b/ghc/tests/io/should_run/io007.hs
@@ -1,7 +1,7 @@
-import IO -- 1.3
+import IO
 
 main =
-    openFile "io007.in" ReadMode >>= \ hIn ->
+    openFile "io007.hs" ReadMode >>= \ hIn ->
     hPutStr hIn "test" `catch`
     \ err ->
         if isIllegalOperation err then