rempve some unused files
[ghc-hetmet.git] / ghc / misc / examples / io / io006 / Main.hs
diff --git a/ghc/misc/examples/io/io006/Main.hs b/ghc/misc/examples/io/io006/Main.hs
deleted file mode 100644 (file)
index 6eb862c..0000000
+++ /dev/null
@@ -1,6 +0,0 @@
-import IO -- 1.3
-
-main =
-    hClose stderr >>
-    hPutStr stderr "junk" `catch` \ err -> if isIllegalOperation err then putStr "Okay\n" else error "Not okay\n"
-