X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=utils%2Frunghc%2Frunghc.hs;h=e2cea312317001411e1efe272ccb19b93cf1bb84;hb=1a3efdd6b616f3a101e182f715df5a0e306eb348;hp=458861ea6574e665d39c1112594ed1f3d9766a4f;hpb=752169f4ea14c0fd890ac55af5395bd1672751ea;p=ghc-hetmet.git

diff --git a/utils/runghc/runghc.hs b/utils/runghc/runghc.hs
index 458861e..e2cea31 100644
--- a/utils/runghc/runghc.hs
+++ b/utils/runghc/runghc.hs
@@ -30,12 +30,7 @@ import Data.Char
 import System.Directory ( removeFile )
 import Control.Exception  ( bracket )
 import System.Directory ( findExecutable, getTemporaryDirectory )
-
-#ifdef USING_COMPAT
-import Compat.RawSystem ( rawSystem )
-#else
 import System.Cmd       ( rawSystem )
-#endif
 
 main :: IO ()
 main = do