From: simonmar <unknown>
Date: Thu, 19 Jun 2003 10:38:15 +0000 (+0000)
Subject: [project @ 2003-06-19 10:38:15 by simonmar]
X-Git-Tag: nhc98-1-18-release~607
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=c10f36a0be68775953958540d745bbd44b081a30;p=haskell-directory.git

[project @ 2003-06-19 10:38:15 by simonmar]
Fix Windows build
---

diff --git a/System/Cmd.hs b/System/Cmd.hs
index 4e7d284..0b093da 100644
--- a/System/Cmd.hs
+++ b/System/Cmd.hs
@@ -15,7 +15,7 @@
 module System.Cmd
     ( system,        -- :: String -> IO ExitCode
 #ifdef __GLASGOW_HASKELL__
-      rawSystem,     -- :: String -> IO ExitCode
+      rawSystem,     -- :: FilePath -> [String] -> IO ExitCode
 #endif
     ) where
 
@@ -26,6 +26,7 @@ import Foreign
 import Foreign.C
 import System.Exit
 import GHC.IOBase
+#include "config.h"
 #endif
 
 #ifdef __HUGS__