patch applied (ghc): Modify FloatOut to fix Trac #4237

[Simon Peyton Jones]

Fri Aug 13 09:31:20 PDT 2010  simonpj at microsoft.com
  * Modify FloatOut to fix Trac #4237
  
  The problem was that a strict binding was getting floated
  out into a letrec. This only happened when profiling was
  on.  It exposed a fragility in the floating strategy.  This
  patch makes it more robust.  See
        Note [Avoiding unnecessary floating]

    M ./compiler/simplCore/FloatOut.lhs -76 +67

View patch online:
http://darcs.haskell.org/cgi-bin/darcsweb.cgi?r=ghc;a=darcs_commitdiff;h=20100813163120-1287e-9e1c04530fac453777b9a60e7832d0da6f8b2baf.gz