X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FbasicTypes%2FVarSet.lhs;h=faf1db1ab64b7e38c347839c0aed4e4936c6d817;hb=1f3a9da2d3b6dcaf0634b3d4f5dbe54f069eebb8;hp=cf4f5df60e3ce93cdd6d5dc3737257ee204f92ab;hpb=9d787ef5a8072b6c1f576f2de1b66edfa59813ed;p=ghc-hetmet.git

diff --git a/ghc/compiler/basicTypes/VarSet.lhs b/ghc/compiler/basicTypes/VarSet.lhs
index cf4f5df..faf1db1 100644
--- a/ghc/compiler/basicTypes/VarSet.lhs
+++ b/ghc/compiler/basicTypes/VarSet.lhs
@@ -5,7 +5,7 @@
 
 \begin{code}
 module VarSet (
-	VarSet, IdSet, TyVarSet, IdOrTyVarSet, UVarSet,
+	VarSet, IdSet, TyVarSet, UVarSet,
 	emptyVarSet, unitVarSet, mkVarSet,
 	extendVarSet,
 	elemVarSet, varSetElems, subVarSet,
@@ -21,7 +21,7 @@ module VarSet (
 #include "HsVersions.h"
 
 import CmdLineOpts	( opt_PprStyle_Debug )
-import Var		( Var, Id, TyVar, UVar, IdOrTyVar, setVarUnique )
+import Var		( Var, Id, TyVar, UVar, setVarUnique )
 import Unique		( Unique, Uniquable(..), incrUnique, deriveUnique )
 import UniqSet
 import UniqFM		( delFromUFM_Directly )
@@ -38,7 +38,6 @@ import Outputable
 type VarSet       = UniqSet Var
 type IdSet 	  = UniqSet Id
 type TyVarSet	  = UniqSet TyVar
-type IdOrTyVarSet = UniqSet IdOrTyVar
 type UVarSet      = UniqSet UVar
 
 emptyVarSet	:: VarSet