X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fghci%2FObjLink.lhs;h=1dbf0cfa731e018b8e6aa1010115b9d0530b9df7;hp=4047301e02328de2ad4be7b8130cbabc12960ac3;hb=41ba0887070487f5cb0f60c55e8f612a6bcaccff;hpb=26ad3fed8383890334d49bb6eb041bcc20fb584e diff --git a/compiler/ghci/ObjLink.lhs b/compiler/ghci/ObjLink.lhs index 4047301..1dbf0cf 100644 --- a/compiler/ghci/ObjLink.lhs +++ b/compiler/ghci/ObjLink.lhs @@ -11,13 +11,6 @@ Primarily, this module consists of an interface to the C-land dynamic linker. \begin{code} {-# OPTIONS -#include "Linker.h" #-} -{-# OPTIONS -w #-} --- The above warning supression flag is a temporary kludge. --- While working on this module you are encouraged to remove it and fix --- any warnings in the module. See --- http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings --- for details - module ObjLink ( initObjLinker, -- :: IO () loadDLL, -- :: String -> IO (Maybe String) @@ -28,10 +21,9 @@ module ObjLink ( resolveObjs -- :: IO SuccessFlag ) where -import Panic ( panic ) +import Panic import BasicTypes ( SuccessFlag, successIf ) import Config ( cLeadingUnderscore ) -import Outputable import Control.Monad ( when ) import Foreign.C