FIX #4381
authorSimon Marlow <marlowsd@gmail.com>
Wed, 13 Oct 2010 10:18:49 +0000 (10:18 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Wed, 13 Oct 2010 10:18:49 +0000 (10:18 +0000)
commitba2fa1aad38f8dab23977beb21d0cad826e5b564
treed9cdb3a46758495b281ce3b4e49f47874f51b75e
parent1523de9c11a0663e538f00679f6a4a682295b2de
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>
GHC/Float.lhs