Another round of External Core fixes
[ghc-hetmet.git] / compiler / main / DriverPipeline.hs
index b05a20a..59535f0 100644 (file)
@@ -45,6 +45,7 @@ import Maybes         ( expectJust )
 import ParserCoreUtils ( getCoreModuleName )
 import SrcLoc          ( unLoc )
 import SrcLoc          ( Located(..) )
+import FastString
 
 import Control.Exception as Exception
 import Data.IORef      ( readIORef, writeIORef, IORef )
@@ -1625,6 +1626,5 @@ hscMaybeAdjustTarget dflags stop _ current_hsc_lang
                -- otherwise, stick to the plan
                 | otherwise = current_hsc_lang
 
-v_Split_info :: IORef (String, Int)
 GLOBAL_VAR(v_Split_info, ("",0), (String,Int))
        -- The split prefix and number of files