FIX #4381 Fix scaleFloat by clamping the scaling parameter so that exponent + scale doesn't overflow.
FIX #4381
Fix scaleFloat by clamping the scaling parameter so that
exponent + scale doesn't overflow.

Patch by: Daniel Fischer <daniel.is.fischer@web.de>

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