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

[ghc-hetmet.git] / ghc / tests / lib / IOExts / trace001.hs

diff --git a/ghc/tests/lib/IOExts/trace001.hs b/ghc/tests/lib/IOExts/trace001.hs
deleted file mode 100644 (file)
index 5e340e0..0000000
--- a/ghc/tests/lib/IOExts/trace001.hs
+++ /dev/null
@@ -1,10 +0,0 @@
-import IO
-import IOExts
-
-main = do
-   hPutStr stderr
-       (trace (trace (trace (trace (trace (trace (trace
-         "one" "fish") "two") "fish") "red") "fish") "blue") "fish")
-   hPutStr stdout
-       (trace (trace (trace (trace (trace (trace (trace
-         "one" "fish") "two") "fish") "red") "fish") "blue") "fish")