| | I'm a little bit suspicious of (not your change, but the original code) | | hunk ./compiler/coreSyn/CoreSyn.lhs 670 | -seqAlts ((c,bs,e):alts) = seqBndrs bs `seq` seqExpr e `seq` seqAlts alts | +seqAlts ((_,bs,e):alts) = seqBndrs bs `seq` seqExpr e `seq` seqAlts alts | | as I can't see a reason not to at least seq c.
That is odd. Do add the seq on c. Simon _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
