No need for -cpp. Use -fglasgow-exts only where needed

AltData/Dynamic.hs

@@ -1,5 +1,5 @@
-{-# OPTIONS -fglasgow-exts -cpp #-}
------------------------------------------------------------------------------
+{-# OPTIONS -fglasgow-exts #-}
+--
 -- |
 -- Module      :  Data.Dynamic
 -- Copyright   :  (c) The University of Glasgow 2001

AltData/Typeable.hs

@@ -1,4 +1,4 @@
-{-# OPTIONS -cpp -fglasgow-exts -fno-implicit-prelude #-}
+{-# OPTIONS -fglasgow-exts #-}
 -- 
 -- Copyright (C) 2004 Don Stewart - http://www.cse.unsw.edu.au/~dons
 -- 

System/Eval/Haskell.hs

@@ -53,8 +53,8 @@ import Data.Map as Map
 import System.IO
 import System.Directory
 
-import Foreign.C
-import Foreign
+-- import Foreign.C
+-- import Foreign
 
 --
 -- ok. the idea is: the have either installed the library, in which case
@@ -176,10 +176,10 @@ typeOf src mods = do
     status             <- make tmpf cmdline
     ty <- case status of
         MakeSuccess _ obj -> do 
-            m_v <- load obj [pwd] loadpath symbol
+            m_v <- load obj [pwd] loadpath symbol :: IO (LoadStatus Dynamic)
             case m_v of 
-                LoadFailure _              -> return "<failure>"
-                LoadSuccess _ (v::Dynamic) -> return $ (init . tail) $ show v
+                LoadFailure _   -> return "<failure>"
+                LoadSuccess _ v -> return $ (init . tail) $ show v
 
         MakeFailure err -> mapM_ putStrLn err >> return []
     makeCleaner tmpf

System/Eval/Utils.hs

@@ -1,4 +1,3 @@
-{-# OPTIONS -fglasgow-exts -fffi -cpp #-}
 -- 
 -- Copyright (C) 2004 Don Stewart - http://www.cse.unsw.edu.au/~dons
 -- 

System/MkTemp.hs

@@ -1,4 +1,4 @@
-{-# OPTIONS -cpp -fffi -fglasgow-exts #-}
+{-# OPTIONS -fglasgow-exts #-}
 --
 -- glaexts for I# ops
 -- 

System/Plugins/Load.hs

@@ -1,4 +1,3 @@
-{-# OPTIONS -#include "Linker.h" #-}
 {-# OPTIONS -fglasgow-exts #-}
 --
 -- Copyright (C) 2004-5 Don Stewart - http://www.cse.unsw.edu.au/~dons

System/Plugins/PackageAPI.hs

@@ -1,4 +1,3 @@
-{-# OPTIONS -cpp #-}
 --
 -- Copyright (C) 2005 Sean Seefried - http://www.cse.unsw.edu.au/~sseefried
 -- 

System/Plugins/ParsePkgConfCabal.hs

@@ -1,4 +1,4 @@
-{-# OPTIONS -fglasgow-exts -cpp #-}
+{-# OPTIONS -fglasgow-exts #-}
 {-# OPTIONS -w #-}
 
 module System.Plugins.ParsePkgConfCabal ( 

System/Plugins/ParsePkgConfLite.hs

@@ -1,4 +1,4 @@
-{-# OPTIONS -fglasgow-exts -cpp #-}
+{-# OPTIONS -fglasgow-exts #-}
 {-# OPTIONS -w #-}
 
 module System.Plugins.ParsePkgConfLite ( 

System/Plugins/Process.hs

@@ -1,4 +1,3 @@
-{-# OPTIONS -cpp #-}
 --
 -- | A Posix.popen compatibility mapping.
 --

System/Plugins/Utils.hs

@@ -1,4 +1,3 @@
-{-# OPTIONS -cpp #-}
 -- 
 -- Copyright (C) 2004 Don Stewart - http://www.cse.unsw.edu.au/~dons
 --