X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=System%2FCmd.hs;h=0b093da64316baf936989b3691fd381673da0279;hb=6b42ff99c867e8eb18b22d1d50e914f1fc532dd5;hp=4e7d2847545c2ca9af7f8b3c48b4723486af1f9a;hpb=fcc7094bfb5cf5beb7d29ea9257adc6196ff9fc7;p=ghc-base.git

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__