[project @ 1998-04-30 20:13:44 by sof]

[ghc-hetmet.git] / ghc / tests / codeGen / should_run / cg015.hs

diff --git a/ghc/tests/codeGen/should_run/cg015.hs b/ghc/tests/codeGen/should_run/cg015.hs
index dab67e5..faa99b8 100644 (file)
--- a/ghc/tests/codeGen/should_run/cg015.hs
+++ b/ghc/tests/codeGen/should_run/cg015.hs
@@ -1,4 +1,4 @@
-module GHCmain ( mainIO ) where
+module Main ( main ) where
 
 import PrelBase
 
@@ -13,7 +13,7 @@ clen :: CList -> Int#
 clen CNil = 0#
 clen (CCons _ cl) = 1# +# (clen cl)
 
-mainIO = case (clen list4) of
+main = case (clen list4) of
                len4 ->
                  case (len4 +# len4) of
                    8# -> finish 65#    -- 'A'