From ca6b0a3e29400e95514169cd2735768965be1396 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 28 Jan 2005 13:54:56 +0000
Subject: [PATCH] [project @ 2005-01-28 13:54:56 by simonmar] System.Info now
 exports:

  compilerName :: String
  compilerVersion :: Data.Version.Version

as requested ages ago by Template Haskell users.  This allows
"conditional compilation" based on the GHC version in TH code.

I've implemented compilerName for all compilers (I hope).  Other
compiler vendors are encouraged to provide their own implementations
of compilerVersion.
---
 System/Info.hs |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/System/Info.hs b/System/Info.hs
index dfb3018..85b9017 100644
--- a/System/Info.hs
+++ b/System/Info.hs
@@ -18,7 +18,9 @@ module System.Info
        os,		    -- :: String
        arch,		    -- :: String
        compilerName,	    -- :: String
+#ifdef __GLASGOW_HASKELL__
        compilerVersion	    -- :: Version
+#endif
    ) where
 
 import Prelude
@@ -50,8 +52,8 @@ compilerName = "hugs"
 #error Unknown compiler name
 #endif
 
-compilerVersion :: Version
 #ifdef __GLASGOW_HASKELL__
+compilerVersion :: Version
 compilerVersion = Version {versionBranch=[maj,min], versionTags=[]}
   where (maj,min) = __GLASGOW_HASKELL__ `divMod` 100
 #endif
-- 
1.7.10.4