Fix a subtle float-in bug
Fix a subtle float-in bug

This patch makes
  fiExpr (AnnLam ...)
  noFloatIntoExpr (AnnLam ...)
line up with each other.  Previously they behaved inconsistently
with bad results.

The details are in Trac #7088.    There's a regression test
in simplCore/should_compile/T7088

ryantm/ghc,TomMD/ghc,christiaanb/ghc,TomMD/ghc,ghc-android/ghc,olsner/ghc,ezyang/ghc,lukexi/ghc-7.8-arm64,holzensp/ghc,sgillespie/ghc,ghc-android/ghc,mcschroeder/ghc,bitemyapp/ghc,frantisekfarka/ghc-dsi,GaloisInc/halvm-ghc,AlexanderPankiv/ghc,ryantm/ghc,bitemyapp/ghc,nathyong/microghc-ghc,vTurbine/ghc,ml9951/ghc,sdiehl/ghc,oldmanmike/ghc,TomMD/ghc,tibbe/ghc,fmthoma/ghc,da-x/ghc,urbanslug/ghc,da-x/ghc,green-haskell/ghc,nushio3/ghc,siddhanathan/ghc,olsner/ghc,nathyong/microghc-ghc,sgillespie/ghc,shlevy/ghc,oldmanmike/ghc,acowley/ghc,gcampax/ghc,tibbe/ghc,forked-upstream-packages-for-ghcjs/ghc,shlevy/ghc,lukexi/ghc-7.8-arm64,nushio3/ghc,siddhanathan/ghc,frantisekfarka/ghc-dsi,ml9951/ghc,vTurbine/ghc,snoyberg/ghc,sdiehl/ghc,oldmanmike/ghc,mcschroeder/ghc,jstolarek/ghc,fmthoma/ghc,lukexi/ghc-7.8-arm64,ryantm/ghc,urbanslug/ghc,forked-upstream-packages-for-ghcjs/ghc,ryantm/ghc,da-x/ghc,wxwxwwxxx/ghc,mcschroeder/ghc,ghc-android/ghc,vTurbine/ghc,holzensp/ghc,anton-dessiatov/ghc,shlevy/ghc,gridaphobe/ghc,nushio3/ghc,mettekou/ghc,da-x/ghc,gcampax/ghc,mettekou/ghc,spacekitteh/smcghc,TomMD/ghc,lukexi/ghc-7.8-arm64,nathyong/microghc-ghc,tjakway/ghcjvm,urbanslug/ghc,vikraman/ghc,sgillespie/ghc,sdiehl/ghc,nathyong/microghc-ghc,ekmett/ghc,tibbe/ghc,christiaanb/ghc,jstolarek/ghc,mcschroeder/ghc,ezyang/ghc,gcampax/ghc,fmthoma/ghc,snoyberg/ghc,acowley/ghc,sdiehl/ghc,acowley/ghc,jstolarek/ghc,da-x/ghc,olsner/ghc,elieux/ghc,vikraman/ghc,vikraman/ghc,gridaphobe/ghc,frantisekfarka/ghc-dsi,snoyberg/ghc,urbanslug/ghc,olsner/ghc,holzensp/ghc,snoyberg/ghc,fmthoma/ghc,mcschroeder/ghc,tjakway/ghcjvm,TomMD/ghc,ekmett/ghc,hferreiro/replay,ml9951/ghc,urbanslug/ghc,ekmett/ghc,vTurbine/ghc,sgillespie/ghc,mettekou/ghc,gridaphobe/ghc,olsner/ghc,nkaretnikov/ghc,wxwxwwxxx/ghc,frantisekfarka/ghc-dsi,anton-dessiatov/ghc,ezyang/ghc,urbanslug/ghc,green-haskell/ghc,spacekitteh/smcghc,ezyang/ghc,christiaanb/ghc,mcschroeder/ghc,ghc-android/ghc,snoyberg/ghc,hferreiro/replay,tjakway/ghcjvm,acowley/ghc,TomMD/ghc,ml9951/ghc,sdiehl/ghc,spacekitteh/smcghc,nkaretnikov/ghc,elieux/ghc,GaloisInc/halvm-ghc,spacekitteh/smcghc,lukexi/ghc,tjakway/ghcjvm,ml9951/ghc,ghc-android/ghc,elieux/ghc,lukexi/ghc,sdiehl/ghc,gridaphobe/ghc,ml9951/ghc,hferreiro/replay,nathyong/microghc-ghc,nomeata/ghc,GaloisInc/halvm-ghc,AlexanderPankiv/ghc,christiaanb/ghc,green-haskell/ghc,mfine/ghc,mfine/ghc,nomeata/ghc,christiaanb/ghc,forked-upstream-packages-for-ghcjs/ghc,jstolarek/ghc,nomeata/ghc,oldmanmike/ghc,GaloisInc/halvm-ghc,mfine/ghc,acowley/ghc,bitemyapp/ghc,olsner/ghc,anton-dessiatov/ghc,shlevy/ghc,ezyang/ghc,shlevy/ghc,anton-dessiatov/ghc,holzensp/ghc,ml9951/ghc,wxwxwwxxx/ghc,mfine/ghc,spacekitteh/smcghc,mfine/ghc,oldmanmike/ghc,siddhanathan/ghc,nushio3/ghc,hferreiro/replay,mettekou/ghc,gridaphobe/ghc,wxwxwwxxx/ghc,christiaanb/ghc,nkaretnikov/ghc,nathyong/microghc-ghc,bitemyapp/ghc,mettekou/ghc,acowley/ghc,ghc-android/ghc,ezyang/ghc,ghc-android/ghc,wxwxwwxxx/ghc,lukexi/ghc,nkaretnikov/ghc,nushio3/ghc,nkaretnikov/ghc,anton-dessiatov/ghc,GaloisInc/halvm-ghc,nomeata/ghc,fmthoma/ghc,hferreiro/replay,anton-dessiatov/ghc,GaloisInc/halvm-ghc,gcampax/ghc,vikraman/ghc,gridaphobe/ghc,wxwxwwxxx/ghc,mcschroeder/ghc,mettekou/ghc,vTurbine/ghc,GaloisInc/halvm-ghc,gcampax/ghc,wxwxwwxxx/ghc,christiaanb/ghc,olsner/ghc,hferreiro/replay,snoyberg/ghc,forked-upstream-packages-for-ghcjs/ghc,lukexi/ghc-7.8-arm64,siddhanathan/ghc,fmthoma/ghc,snoyberg/ghc,nkaretnikov/ghc,gcampax/ghc,mfine/ghc,ekmett/ghc,bitemyapp/ghc,mfine/ghc,urbanslug/ghc,jstolarek/ghc,tjakway/ghcjvm,nushio3/ghc,hferreiro/replay,AlexanderPankiv/ghc,siddhanathan/ghc,gridaphobe/ghc,holzensp/ghc,gcampax/ghc,nushio3/ghc,elieux/ghc,acowley/ghc,AlexanderPankiv/ghc,ryantm/ghc,anton-dessiatov/ghc,sgillespie/ghc,tibbe/ghc,nkaretnikov/ghc,lukexi/ghc,ekmett/ghc,elieux/ghc,ezyang/ghc,nathyong/microghc-ghc,oldmanmike/ghc,elieux/ghc,siddhanathan/ghc,nomeata/ghc,TomMD/ghc,elieux/ghc,sgillespie/ghc,green-haskell/ghc,green-haskell/ghc,vTurbine/ghc,siddhanathan/ghc,shlevy/ghc,AlexanderPankiv/ghc,tjakway/ghcjvm,oldmanmike/ghc,lukexi/ghc,ml9951/ghc,vikraman/ghc,vTurbine/ghc,da-x/ghc,tibbe/ghc,forked-upstream-packages-for-ghcjs/ghc,fmthoma/ghc,mettekou/ghc,AlexanderPankiv/ghc,vikraman/ghc,da-x/ghc,AlexanderPankiv/ghc,shlevy/ghc,sgillespie/ghc,sdiehl/ghc,tjakway/ghcjvm,forked-upstream-packages-for-ghcjs/ghc,forked-upstream-packages-for-ghcjs/ghc,vikraman/ghc,frantisekfarka/ghc-dsi