Do a bit more CSE
authorSimon Peyton Jones <simonpj@microsoft.com>
Mon, 31 Jul 2017 10:00:33 +0000 (11:00 +0100)
committerSimon Peyton Jones <simonpj@microsoft.com>
Mon, 31 Jul 2017 12:36:49 +0000 (13:36 +0100)
commit3ab342eb1b82ba9218a9d7786c523b1128b2bdf1
tree3621de16e5b9b1ad8ff95f9f5cb08679e2111738
parent46368868dc85fc7f0c95fe88af892ad850ed7bc6
Do a bit more CSE

I discovered that in

   let x = MkT y in ....(MKT y |> co)....

we weren't CSE'ing the (MkT y).  The fix is easy.
compiler/simplCore/CSE.hs