From d6e97b4ebe0e90ecfd6e8d4b8fd1ef594d15b9e0 Mon Sep 17 00:00:00 2001
From: michaelw <unknown>
Date: Tue, 25 Jul 2000 12:24:14 +0000
Subject: [PATCH] [project @ 2000-07-25 12:24:14 by michaelw] giving the
version number when asked for is NOT an error, therefore output now goes to
stdout (cf. Coding Standards)
---
ghc/driver/Main.hs | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/ghc/driver/Main.hs b/ghc/driver/Main.hs
index b40d18b59d0a..e2f7fa1ac76f 100644
--- a/ghc/driver/Main.hs
+++ b/ghc/driver/Main.hs
@@ -1750,10 +1750,10 @@ opts =
------- version ----------------------------------------------------
- , ( "-version" , NoArg (do hPutStrLn stderr (cProjectName
+ , ( "-version" , NoArg (do hPutStrLn stdout (cProjectName
++ ", version " ++ version_str)
exitWith ExitSuccess))
- , ( "-numeric-version", NoArg (do hPutStrLn stderr version_str
+ , ( "-numeric-version", NoArg (do hPutStrLn stdout version_str
exitWith ExitSuccess))
------- verbosity ----------------------------------------------------
--
GitLab