Establish the invariant that (LitAlt l) is always unlifted
authorSimon Peyton Jones <simonpj@microsoft.com>
Wed, 9 Nov 2011 23:32:20 +0000 (23:32 +0000)
committerSimon Peyton Jones <simonpj@microsoft.com>
Wed, 9 Nov 2011 23:32:20 +0000 (23:32 +0000)
commitf96db3ca8a7c83cc3da242fad761fb05543068f6
tree5477bd92619eab7d4abe97f4ca55274d3c264d0f
parent2d5a1a5b14d636c3b248821da6a444fd02f74b8e
Establish the invariant that (LitAlt l) is always unlifted

...and make sure it is, esp in the call to findAlt in
the mighty Simplifier.  Failing to check this led to
searching a bunch of DataAlts for a LitAlt Integer.
Naughty.  See Trac #5603 for a case in point.
compiler/basicTypes/Literal.lhs
compiler/coreSyn/CoreLint.lhs
compiler/coreSyn/CoreSyn.lhs
compiler/deSugar/DsUtils.lhs
compiler/prelude/PrelRules.lhs
compiler/simplCore/Simplify.lhs
compiler/specialise/SpecConstr.lhs