Change wording of "main is not defined in Main" message (Trac #7816)
authorSimon Peyton Jones <simonpj@microsoft.com>
Fri, 12 Apr 2013 12:29:53 +0000 (13:29 +0100)
committerSimon Peyton Jones <simonpj@microsoft.com>
Fri, 12 Apr 2013 12:29:53 +0000 (13:29 +0100)
compiler/typecheck/TcRnDriver.lhs

index 275ce07..15ccf57 100644 (file)
@@ -1102,9 +1102,9 @@ check_main dflags tcg_env
 ppMainFn :: RdrName -> SDoc
 ppMainFn main_fn
   | main_fn == main_RDR_Unqual
-  = ptext (sLit "function") <+> quotes (ppr main_fn)
+  = ptext (sLit "IO action") <+> quotes (ppr main_fn)
   | otherwise
-  = ptext (sLit "main function") <+> quotes (ppr main_fn)
+  = ptext (sLit "main IO action") <+> quotes (ppr main_fn)
 
 -- | Get the unqualified name of the function to use as the \"main\" for the main module.
 -- Either returns the default name or the one configured on the command line with -main-is