Commit 0ab8b6d4 authored by simonpj@microsoft.com's avatar simonpj@microsoft.com
Browse files

Missing import for stage 2

parent 1448e730
...@@ -99,6 +99,7 @@ import TcSimplify ( tcSimplifyInteractive, tcSimplifyInfer ) ...@@ -99,6 +99,7 @@ import TcSimplify ( tcSimplifyInteractive, tcSimplifyInfer )
import TcType ( Type, mkForAllTys, mkFunTys, mkTyConApp, tyVarsOfType, isTauTy, import TcType ( Type, mkForAllTys, mkFunTys, mkTyConApp, tyVarsOfType, isTauTy,
isUnLiftedType, tyClsNamesOfDFunHead, tyClsNamesOfType, isUnitTy ) isUnLiftedType, tyClsNamesOfDFunHead, tyClsNamesOfType, isUnitTy )
import TcEnv ( tcLookupTyCon, tcLookupId, tcLookupGlobal ) import TcEnv ( tcLookupTyCon, tcLookupId, tcLookupGlobal )
import TypeRep ( TyThing(..) )
import RnTypes ( rnLHsType ) import RnTypes ( rnLHsType )
import Inst ( tcGetInstEnvs ) import Inst ( tcGetInstEnvs )
import InstEnv ( classInstances, instEnvElts ) import InstEnv ( classInstances, instEnvElts )
...@@ -113,7 +114,7 @@ import TysWiredIn ( mkListTy, unitTy ) ...@@ -113,7 +114,7 @@ import TysWiredIn ( mkListTy, unitTy )
import IdInfo ( GlobalIdDetails(..) ) import IdInfo ( GlobalIdDetails(..) )
import Kind ( Kind ) import Kind ( Kind )
import Var ( globaliseId ) import Var ( globaliseId )
import Name ( nameModule, isBuiltInSyntax, isInternalName ) import Name ( isBuiltInSyntax, isInternalName )
import OccName ( isTcOcc ) import OccName ( isTcOcc )
import NameEnv ( delListFromNameEnv ) import NameEnv ( delListFromNameEnv )
import PrelNames ( iNTERACTIVE, ioTyConName, printName, itName, import PrelNames ( iNTERACTIVE, ioTyConName, printName, itName,
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment