Remove ilxGen; part of trac #2243

[ghc-hetmet.git] / compiler / ilxGen / tests / test21.hs

diff --git a/compiler/ilxGen/tests/test21.hs b/compiler/ilxGen/tests/test21.hs
deleted file mode 100644 (file)
index 1870f22..0000000
--- a/compiler/ilxGen/tests/test21.hs
+++ /dev/null
@@ -1,13 +0,0 @@
-{-# OPTIONS -fno-implicit-prelude  #-}
-
-import PrelIOBase
-import PrelIO
-import PrelBase
-import PrelAddr
-
-foreign import "libHS_cbits" "getErrStr__"  unsafe ggetErrStr__  :: Int -> IO Addr 
-
-main = putStr (uunsafePerformIO (ggetErrStr__ 4))
-
-uunsafePerformIO       :: IO Addr -> [Char]
-uunsafePerformIO (IO m) = case m realWorld# of (# _, (A# r) #)   -> (unpackCString#  r)