rempve some unused files

[ghc-hetmet.git] / ghc / misc / examples / posix / po006 / Main.hs

diff --git a/ghc/misc/examples/posix/po006/Main.hs b/ghc/misc/examples/posix/po006/Main.hs
deleted file mode 100644 (file)
index eb6451d..0000000
--- a/ghc/misc/examples/posix/po006/Main.hs
+++ /dev/null
@@ -1,14 +0,0 @@
-import Posix
-
-main = 
-    epochTime >>= \ start ->
-    sleep 5 >>
-    let timeleft = 0 in
-    epochTime >>= \ finish ->
-    putStr "Started: " >>
-    print start >>
-    putStr "\nSlept: " >>
-    print (5 - timeleft) >>
-    putStr "\nFinished: " >>
-    print finish >>
-    putChar '\n'