X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FstgSyn%2FStgLint.lhs;h=21db424b43d0db9564f7d56b4890185ec8ce0cd2;hb=428eac5caec93bc48249bcc6a320de43eb28be82;hp=f2cecf9b0110f073e43cdb189d321194dc87be8b;hpb=9d0c8f842e35dde3d570580cf62a32779f66a6de;p=ghc-hetmet.git diff --git a/compiler/stgSyn/StgLint.lhs b/compiler/stgSyn/StgLint.lhs index f2cecf9..21db424 100644 --- a/compiler/stgSyn/StgLint.lhs +++ b/compiler/stgSyn/StgLint.lhs @@ -20,7 +20,7 @@ import Name ( getSrcLoc ) import ErrUtils ( Message, mkLocMessage ) import TypeRep import Type ( mkFunTys, splitFunTys, splitTyConApp_maybe, - isUnLiftedType, isTyVarTy, dropForAlls, Type + isUnLiftedType, isTyVarTy, dropForAlls ) import TyCon ( isAlgTyCon, isNewTyCon, tyConDataCons ) import Util ( zipEqual, equalLength )