From c9107a839eb7959d166b470f4526679cb55173c7 Mon Sep 17 00:00:00 2001 From: simonmar Date: Thu, 10 Aug 2000 10:33:22 +0000 Subject: [PATCH] [project @ 2000-08-10 10:31:46 by simonmar] remove unused imports --- ghc/compiler/coreSyn/CoreSyn.lhs | 2 -- ghc/compiler/rename/ParseIface.y | 7 ------- 2 files changed, 9 deletions(-) diff --git a/ghc/compiler/coreSyn/CoreSyn.lhs b/ghc/compiler/coreSyn/CoreSyn.lhs index fa08ba4..43e82a7 100644 --- a/ghc/compiler/coreSyn/CoreSyn.lhs +++ b/ghc/compiler/coreSyn/CoreSyn.lhs @@ -48,10 +48,8 @@ module CoreSyn ( import CostCentre ( CostCentre, noCostCentre ) import Var ( Var, Id, TyVar, isTyVar, isId, idType ) -import VarEnv import Type ( Type, UsageAnn, mkTyVarTy, isUnLiftedType, seqType ) import Literal ( Literal(MachStr), mkMachInt ) -import PrimOp ( PrimOp ) import DataCon ( DataCon, dataConId ) import VarSet import Outputable diff --git a/ghc/compiler/rename/ParseIface.y b/ghc/compiler/rename/ParseIface.y index c854f14..d9c6b95 100644 --- a/ghc/compiler/rename/ParseIface.y +++ b/ghc/compiler/rename/ParseIface.y @@ -53,8 +53,6 @@ import RnMonad ( ImportVersion, ParsedIface(..), WhatsImported(..), RdrNamePragma, ExportItem, RdrAvailInfo, GenAvailInfo(..), WhetherHasOrphans, IsBootInterface ) -import Bag ( emptyBag, unitBag, snocBag ) -import FiniteMap ( emptyFM, unitFM, addToFM, plusFM, bagToFM, FiniteMap ) import RdrName ( RdrName, mkRdrUnqual, mkSysQual, mkSysUnqual, mkRdrNameWkr ) import Name ( OccName, Provenance ) import OccName ( mkSysOccFS, @@ -64,16 +62,11 @@ import OccName ( mkSysOccFS, import Module ( ModuleName, PackageName, mkSysModuleFS, mkModule ) import SrcLoc ( SrcLoc ) import CmdLineOpts ( opt_InPackage ) -import Maybes import Outputable import List ( insert ) import GlaExts import FastString ( tailFS ) - -#if __HASKELL1__ > 4 -import Ratio ( (%) ) -#endif } %name parseIface -- 1.7.10.4