Fix Trac #3717 by making exprOkForSpeculation a bit cleverer
authorsimonpj@microsoft.com <unknown>
Tue, 25 Jan 2011 11:05:25 +0000 (11:05 +0000)
committersimonpj@microsoft.com <unknown>
Tue, 25 Jan 2011 11:05:25 +0000 (11:05 +0000)
commitd056dfedcf9c7e5e58031ad5948c480f9cdca16f
treea7c9df4aa232284d48c6b6739460fb9cb4ed35d7
parent5cdc2f1dcea1425ab4a842fde708cf55b17333c5
Fix Trac #3717 by making exprOkForSpeculation a bit cleverer

The main change here is to do with dropping redundant seqs.
See Note [exprOkForSpeculation: case expressions] in CoreUtils.
compiler/coreSyn/CoreUtils.lhs
compiler/simplCore/Simplify.lhs