Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
obsidiansystems
GHC
Commits
76050f00
Commit
76050f00
authored
Jul 11, 2000
by
simonmar
Browse files
[project @ 2000-07-11 15:57:45 by simonmar]
remove unused imports
parent
d7d4132c
Changes
4
Hide whitespace changes
Inline
Side-by-side
ghc/compiler/coreSyn/CoreLint.lhs
View file @
76050f00
...
...
@@ -39,7 +39,6 @@ import Type ( Type, tyVarsOfType,
isUnboxedTupleType,
hasMoreBoxityInfo
)
import PprType ( {- instance Outputable Type -} )
import TyCon ( TyCon, isPrimTyCon, tyConDataCons )
import BasicTypes ( RecFlag(..), isNonRec )
import Maybe
...
...
ghc/compiler/coreSyn/CoreTidy.lhs
View file @
76050f00
...
...
@@ -26,7 +26,6 @@ import Id ( idType, idInfo, idName, idSpecialisation,
idDemandInfo, setIdDemandInfo,
)
import IdInfo ( specInfo, setSpecInfo,
inlinePragInfo, setInlinePragInfo, InlinePragInfo(..),
setUnfoldingInfo, setDemandInfo,
workerInfo, setWorkerInfo, WorkerInfo(..)
)
...
...
@@ -39,7 +38,6 @@ import UniqSupply ( UniqSupply )
import Unique ( Uniquable(..) )
import SrcLoc ( noSrcLoc )
import Util ( mapAccumL )
import Outputable
\end{code}
...
...
ghc/compiler/coreSyn/CoreUnfold.lhs
View file @
76050f00
...
...
@@ -44,14 +44,12 @@ import CmdLineOpts ( opt_UF_CreationThreshold,
import CoreSyn
import PprCore ( pprCoreExpr )
import OccurAnal ( occurAnalyseGlobalExpr )
import BinderInfo ( )
import CoreUtils ( exprIsValue, exprIsCheap, exprIsBottom, exprIsTrivial )
import Id ( Id, idType, idFlavour, isId, idWorkerInfo,
idSpecialisation, idInlinePragma, idUnfolding,
isPrimOpId_maybe
)
import VarSet
import Name ( isLocallyDefined )
import Literal ( isLitLitLit )
import PrimOp ( PrimOp(..), primOpIsDupable, primOpOutOfLine, ccallIsCasm )
import IdInfo ( ArityInfo(..), InlinePragInfo(..), OccInfo(..), IdFlavour(..), CprInfo(..),
...
...
@@ -59,10 +57,7 @@ import IdInfo ( ArityInfo(..), InlinePragInfo(..), OccInfo(..), IdFlavour(..),
)
import Type ( splitFunTy_maybe, isUnLiftedType )
import Unique ( Unique, buildIdKey, augmentIdKey, hasKey )
import Maybes ( maybeToBool )
import Bag
import List ( maximumBy )
import Util ( isIn, lengthExceeds )
import Outputable
#if __GLASGOW_HASKELL__ >= 404
...
...
ghc/compiler/coreSyn/Subst.lhs
View file @
76050f00
...
...
@@ -49,7 +49,6 @@ import IdInfo ( IdInfo, isFragileOccInfo,
specInfo, setSpecInfo,
WorkerInfo(..), workerExists, workerInfo, setWorkerInfo, WorkerInfo
)
import BasicTypes ( OccInfo(..) )
import UniqSupply ( UniqSupply, uniqFromSupply, splitUniqSupply )
import Var ( Var, Id, TyVar, isTyVar )
import Outputable
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment