Commit 1f8596c2 authored by Simon Marlow's avatar Simon Marlow
Browse files

fix compilation with older GHCs

parent d35356e8
...@@ -86,6 +86,8 @@ import Foreign ...@@ -86,6 +86,8 @@ import Foreign
import CString ( CString, peekCString ) import CString ( CString, peekCString )
#endif #endif
import Text.Regex
#if __GLASGOW_HASKELL__ < 603 #if __GLASGOW_HASKELL__ < 603
-- rawSystem comes from libghccompat.a in stage1 -- rawSystem comes from libghccompat.a in stage1
import Compat.RawSystem ( rawSystem ) import Compat.RawSystem ( rawSystem )
...@@ -95,7 +97,6 @@ import System.IO.Error ( ioeGetErrorType ) ...@@ -95,7 +97,6 @@ import System.IO.Error ( ioeGetErrorType )
import System.Process ( runInteractiveProcess, getProcessExitCode ) import System.Process ( runInteractiveProcess, getProcessExitCode )
import System.IO ( hSetBuffering, hGetLine, BufferMode(..) ) import System.IO ( hSetBuffering, hGetLine, BufferMode(..) )
import Control.Concurrent( forkIO, newChan, readChan, writeChan ) import Control.Concurrent( forkIO, newChan, readChan, writeChan )
import Text.Regex
import Data.Char ( isSpace ) import Data.Char ( isSpace )
import FastString ( mkFastString ) import FastString ( mkFastString )
import SrcLoc ( SrcLoc, mkSrcLoc, noSrcSpan, mkSrcSpan ) import SrcLoc ( SrcLoc, mkSrcLoc, noSrcSpan, mkSrcSpan )
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment