[project @ 2001-11-01 10:33:58 by simonpj]
authorsimonpj <unknown>
Thu, 1 Nov 2001 10:33:58 +0000 (10:33 +0000)
committersimonpj <unknown>
Thu, 1 Nov 2001 10:33:58 +0000 (10:33 +0000)
commit883d5ca94bba6c5ba57db221b8d8f5e82a6453e7
tree4b55e4fe803d0e5cacf1190f21b1756d04481980
parent790924316924fed69698af08a8bc1eda9952c946
[project @ 2001-11-01 10:33:58 by simonpj]
----------------------------------
Fix a bug in Simplify.mkDupableAlt
----------------------------------

[This is the HEAD commit; I've fixed
 the branch separately.]

This fixes a funResultTy panic that Koen encountered.

The reason was that the simplifier was doing a
case-of-case where the result had a polymorphic type.
This in turn showed up because of a newtype (now
transparent) with a forall inside it.

The fix is very easy; can't think how I got it wrong
in the first place.
ghc/compiler/coreSyn/CoreUtils.lhs
ghc/compiler/simplCore/Simplify.lhs