Remove ilxGen; part of trac #2243
[ghc-hetmet.git] / compiler / ilxGen / tests / yes2.hs
diff --git a/compiler/ilxGen/tests/yes2.hs b/compiler/ilxGen/tests/yes2.hs
deleted file mode 100644 (file)
index 7fa20c5..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-
-import PrelIOBase
-foreign import "ilxHello" unsafe ilxHello :: IO ()
-
-
-
-seqIO :: IO () -> IO () -> IO ()
-seqIO (IO m) (IO k) = IO ( \ s ->
-  case m s of 
-    (# new_s, a #) -> k new_s
-  )
-
-
-yes () = seqIO ilxHello (yes ())
-
-main :: IO ()
-main = yes ()
-