[project @ 1999-01-28 09:43:38 by simonpj]

[ghc-hetmet.git] / ghc / compiler / simplCore / OccurAnal.lhs

diff --git a/ghc/compiler/simplCore/OccurAnal.lhs b/ghc/compiler/simplCore/OccurAnal.lhs
index 7215d93..9bb19b9 100644 (file)
--- a/ghc/compiler/simplCore/OccurAnal.lhs
+++ b/ghc/compiler/simplCore/OccurAnal.lhs
@@ -23,7 +23,7 @@ import CmdLineOpts    ( SimplifierSwitch(..) )
 import CoreSyn
 import CoreUtils       ( exprIsTrivial, idSpecVars )
 import Const           ( Con(..), Literal(..) )
-import Id              ( idWantsToBeINLINEd, 
+import Id              ( idWantsToBeINLINEd, isSpecPragmaId,
                          getInlinePragma, setInlinePragma,
                          omitIfaceSigForId,
                          getIdSpecialisation,