X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FdeSugar%2FDesugar.lhs;h=7b008e9aaf2a4571995e36efd8e9eff4b702d187;hp=37a3cf9236ab918572163d197892fa0ffdff7ae1;hb=d0faaa6fa0cecd23c5670fd199e9206275313666;hpb=a52ff7619e8b7d74a9d933d922eeea49f580bca8 diff --git a/compiler/deSugar/Desugar.lhs b/compiler/deSugar/Desugar.lhs index 37a3cf9..7b008e9 100644 --- a/compiler/deSugar/Desugar.lhs +++ b/compiler/deSugar/Desugar.lhs @@ -378,6 +378,8 @@ switching off EnableRewriteRules. See DsExpr.dsExplicitList. That keeps the desugaring of list comprehensions simple too. + + Nor do we want to warn of conversion identities on the LHS; the rule is precisly to optimise them: {-# RULES "fromRational/id" fromRational = id :: Rational -> Rational #-}