[project @ 2005-01-26 13:27:44 by malcolm]

[haskell-directory.git] / System / Info.hs

diff --git a/System/Info.hs b/System/Info.hs
index a064991..02cd45d 100644 (file)
--- a/System/Info.hs
+++ b/System/Info.hs
@@ -2,7 +2,7 @@
 -- |
 -- Module      :  System.Info
 -- Copyright   :  (c) The University of Glasgow 2001
--- License     :  BSD-style (see the file libraries/core/LICENSE)
+-- License     :  BSD-style (see the file libraries/base/LICENSE)
 -- 
 -- Maintainer  :  libraries@haskell.org
 -- Stability   :  experimental
@@ -13,7 +13,9 @@
 --
 -----------------------------------------------------------------------------
 
+#ifndef __NHC__
 #include "MachDeps.h"
+#endif
 
 module System.Info
    (
@@ -23,8 +25,15 @@ module System.Info
 
 import Prelude
 
+#ifndef __NHC__
+
 arch :: String
 arch = HOST_ARCH
 
 os :: String
 os = HOST_OS
+
+#else
+os,arch ::String
+#include "OSInfo.hs"
+#endif