[project @ 1997-03-14 08:02:40 by simonpj]
[nofib.git] / GHC_ONLY / cg030 / Main.hs
index 4cf54fc..49cd148 100644 (file)
@@ -1,5 +1,6 @@
-module GHCmain where
+module Main(mainPrimIO) where
 
-import PreludeGlaST
+import ST
+import STBase
 
-mainPrimIO = _ccall_ puts "123\n"
+mainPrimIO = _ccall_ puts "123\n" >> return ()