From c0c05bb3fbfdd1a82bccdcbc34c77a4927c99316 Mon Sep 17 00:00:00 2001 From: simonmar Date: Thu, 8 Jan 2004 10:45:33 +0000 Subject: [PATCH] [project @ 2004-01-08 10:45:33 by simonmar] Fix warning message about missing Main module to refer to take into account the -main-is flag. --- ghc/compiler/compMan/CompManager.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/compiler/compMan/CompManager.lhs b/ghc/compiler/compMan/CompManager.lhs index cfea2b8..c4c1913 100644 --- a/ghc/compiler/compMan/CompManager.lhs +++ b/ghc/compiler/compMan/CompManager.lhs @@ -576,7 +576,7 @@ cmLoadModules cmstate1 mg2unsorted let do_linking = a_root_is_Main || no_hs_main when (ghci_mode == Batch && isJust ofile && not do_linking && verb > 0) $ - hPutStrLn stderr "Warning: output was redirected with -o, but no output will be generated\nbecause there is no Main module." + hPutStrLn stderr ("Warning: output was redirected with -o, but no output will be generated\nbecause there is no " ++ main_mod ++ " module.") -- link everything together linkresult <- link ghci_mode dflags do_linking (hsc_HPT hsc_env3) -- 1.7.10.4