[project @ 2002-10-11 11:05:20 by malcolm]

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

diff --git a/System/Exit.hs b/System/Exit.hs
index db37a7f..3c0ecb8 100644 (file)
--- a/System/Exit.hs
+++ b/System/Exit.hs
@@ -29,6 +29,13 @@ import GHC.IOBase
 import Hugs.System
 #endif
 
+#ifdef __NHC__
+import System
+  ( ExitCode(..)
+  , exitWith
+  )
+#endif
+
 -- ---------------------------------------------------------------------------
 -- exitWith