diff options
| author | simonpj <unknown> | 2003-07-02 14:59:12 +0000 |
|---|---|---|
| committer | simonpj <unknown> | 2003-07-02 14:59:12 +0000 |
| commit | 05afb7485eea44d6410139f8a20c94b6f66c46f2 (patch) | |
| tree | 0cec8c549f5f169bffafdf0a5faf336fd6ebee1c /ghc/compiler/ndpFlatten | |
| parent | e34efb9815ab7b2cf06ac940fe10ff25c24c9631 (diff) | |
| download | haskell-05afb7485eea44d6410139f8a20c94b6f66c46f2.tar.gz | |
[project @ 2003-07-02 14:59:00 by simonpj]
Some random import trimming
Diffstat (limited to 'ghc/compiler/ndpFlatten')
| -rw-r--r-- | ghc/compiler/ndpFlatten/FlattenMonad.hs | 1 | ||||
| -rw-r--r-- | ghc/compiler/ndpFlatten/Flattening.hs | 2 |
2 files changed, 1 insertions, 2 deletions
diff --git a/ghc/compiler/ndpFlatten/FlattenMonad.hs b/ghc/compiler/ndpFlatten/FlattenMonad.hs index beb5f16e89..b8a2114ac0 100644 --- a/ghc/compiler/ndpFlatten/FlattenMonad.hs +++ b/ghc/compiler/ndpFlatten/FlattenMonad.hs @@ -64,7 +64,6 @@ module FlattenMonad ( import Monad (mplus) -- GHC -import CmdLineOpts (opt_Flatten) import Panic (panic) import Outputable (Outputable(ppr), pprPanic) import UniqSupply (UniqSupply, splitUniqSupply, uniqFromSupply) diff --git a/ghc/compiler/ndpFlatten/Flattening.hs b/ghc/compiler/ndpFlatten/Flattening.hs index 51a5d9a944..4f0f86b53a 100644 --- a/ghc/compiler/ndpFlatten/Flattening.hs +++ b/ghc/compiler/ndpFlatten/Flattening.hs @@ -56,7 +56,7 @@ module Flattening ( -- friends import NDPCoreUtils (tupleTyArgs, funTyArgs, parrElemTy, isDefault, - isLit, mkPArrTy, mkTuple, isSimpleExpr, boolTy, substIdEnv) + isLit, mkPArrTy, mkTuple, isSimpleExpr, substIdEnv) import FlattenMonad (Flatten, runFlatten, mkBind, extendContext, packContext, liftVar, liftConst, intersectWithContext, mk'fst, mk'lengthP, mk'replicateP, mk'mapP, mk'bpermuteDftP, |