From 1aecfe605ba78e5ffdae397859105c116a049785 Mon Sep 17 00:00:00 2001
From: hallgren <hallgren@chalmers.se>
Date: Fri, 8 Jun 2012 11:17:46 +0000
Subject: [PATCH] More detailed version info in the output of "gf -version"

---
 src/compiler/GF.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/compiler/GF.hs b/src/compiler/GF.hs
index 052e02c88..40ce7fed3 100644
--- a/src/compiler/GF.hs
+++ b/src/compiler/GF.hs
@@ -6,6 +6,7 @@ import GFI
 import GF.Data.ErrM
 import GF.Infra.Option
 import GF.Infra.UseIO
+import GF.Infra.BuildInfo (buildInfo)
 import Paths_gf
 
 import Data.Version
@@ -41,7 +42,7 @@ main = do
 mainOpts :: Options -> [FilePath] -> IO ()
 mainOpts opts files = 
     case flag optMode opts of
-      ModeVersion     -> putStrLn $ "Grammatical Framework (GF) version " ++ showVersion version
+      ModeVersion     -> putStrLn $ "Grammatical Framework (GF) version " ++ showVersion version ++ "\n" ++ buildInfo
       ModeHelp        -> putStrLn helpMessage
       ModeInteractive -> mainGFI opts files
       ModeRun         -> mainRunGFI opts files