[project @ 2005-01-28 16:09:06 by malcolm]

[ghc-base.git] / System / Info.hs

diff --git a/System/Info.hs b/System/Info.hs
index 85b9017..68a4a1f 100644 (file)
--- a/System/Info.hs
+++ b/System/Info.hs
@@ -57,3 +57,10 @@ compilerVersion :: Version
 compilerVersion = Version {versionBranch=[maj,min], versionTags=[]}
   where (maj,min) = __GLASGOW_HASKELL__ `divMod` 100
 #endif
+
+#ifdef __NHC__
+compilerVersion :: Version
+compilerVersion = Version {versionBranch=[maj,min], versionTags=[]}
+  where (maj,min) = __NHC__ `divMod` 100
+#endif
+