X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FdeSugar%2FDsListComp.lhs;h=123a8f28f992ea750ee15d9c80d1c68f4e395cd0;hb=68afb16743cafd5b7495771d359891c6dfc5a186;hp=7b6651a14e38077721c1604df2b7755d920acb46;hpb=3990d44447b6c38a2effd68beb50da459dfd19fc;p=ghc-hetmet.git diff --git a/ghc/compiler/deSugar/DsListComp.lhs b/ghc/compiler/deSugar/DsListComp.lhs index 7b6651a..123a8f2 100644 --- a/ghc/compiler/deSugar/DsListComp.lhs +++ b/ghc/compiler/deSugar/DsListComp.lhs @@ -10,7 +10,7 @@ import Ubiq import DsLoop -- break dsExpr-ish loop import HsSyn ( Qual(..), HsExpr, HsBinds ) -import TcHsSyn ( TypecheckedQual(..), TypecheckedHsExpr(..) ) +import TcHsSyn ( TypecheckedQual(..), TypecheckedHsExpr(..) , TypecheckedHsBinds(..) ) import DsHsSyn ( outPatType ) import CoreSyn