From: simonmar <unknown>
Date: Wed, 23 Nov 2005 12:27:43 +0000 (+0000)
Subject: [project @ 2005-11-23 12:27:43 by simonmar]
X-Git-Tag: Initial_conversion_from_CVS_complete~27
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=30ee6ff795f017c433f27b37f290b29374545cec;p=ghc-hetmet.git

[project @ 2005-11-23 12:27:43 by simonmar]
report the correct version number in the "compiled by GHC version.."
message in a bootstrapped compiler.
---

diff --git a/ghc/compiler/main/Main.hs b/ghc/compiler/main/Main.hs
index 95891f7..37ce970 100644
--- a/ghc/compiler/main/Main.hs
+++ b/ghc/compiler/main/Main.hs
@@ -405,7 +405,12 @@ showBanner cli_mode dflags = do
 	do hPutStr stderr "Glasgow Haskell Compiler, Version "
  	   hPutStr stderr cProjectVersion
 	   hPutStr stderr ", for Haskell 98, compiled by GHC version "
+#ifdef GHCI
+	   -- GHCI is only set when we are bootstrapping...
+ 	   hPutStrLn stderr cProjectVersion
+#else
 	   hPutStrLn stderr cBooterVersion
+#endif
 
 showVersion :: IO ()
 showVersion = do