From 445636e4d8de610f4c6f7cfd1333b49fa36378bf Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Thu, 30 Apr 1998 19:45:25 +0000
Subject: [PATCH] [project @ 1998-04-30 19:45:25 by sof] import list updates
---
ghc/compiler/coreSyn/CoreLint.lhs | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/ghc/compiler/coreSyn/CoreLint.lhs b/ghc/compiler/coreSyn/CoreLint.lhs
index 62868f680a90..a7b9b97bfffa 100644
--- a/ghc/compiler/coreSyn/CoreLint.lhs
+++ b/ghc/compiler/coreSyn/CoreLint.lhs
@@ -15,13 +15,14 @@ import IO ( hPutStr, stderr )
import CmdLineOpts ( opt_D_show_passes, opt_DoCoreLinting )
import CoreSyn
+import CoreUtils ( idSpecVars )
import Bag
import Kind ( hasMoreBoxityInfo, Kind{-instance-} )
import Literal ( literalType, Literal{-instance-} )
import Id ( idType, isBottomingId, dataConRepType, isDataCon, isAlgCon,
dataConArgTys, GenId{-instances-},
- emptyIdSet, mkIdSet,
+ emptyIdSet, mkIdSet,
unionIdSets, elementOfIdSet, IdSet,
Id
)
@@ -33,7 +34,6 @@ import PprCore
import ErrUtils ( doIfSet, ghcExit )
import PrimOp ( primOpType )
import PrimRep ( PrimRep(..) )
-import Specialise ( idSpecVars )
import SrcLoc ( SrcLoc )
import Type ( mkFunTy, splitFunTy_maybe, mkForAllTy,
splitForAllTy_maybe,
--
GitLab