Fix CaseIdentity optimisaion
authorSimon Peyton Jones <simonpj@microsoft.com>
Wed, 16 Nov 2011 10:37:47 +0000 (10:37 +0000)
committerSimon Peyton Jones <simonpj@microsoft.com>
Wed, 16 Nov 2011 10:37:47 +0000 (10:37 +0000)
commit02ac2974ce8e537372bff8d9e0a6efb461ed2c59
tree706ae310bf3de2bc811ee32e5ada8927b3525db2
parent04de986e978d89eb841b113e9f5b0c2a8f0cc101
Fix CaseIdentity optimisaion

In fixing one bug I'd introduced another;
   case x of { T -> T; F -> F }
wasn't getting optmised!  Trivial to fix.
compiler/simplCore/SimplUtils.lhs