From: Ian Lynagh <igloo@earth.li>
Date: Tue, 2 Jun 2009 18:36:08 +0000 (+0000)
Subject: Remove unnecessary parens
X-Git-Tag: 2009-06-25~26
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=eb1ea554e09e2674ccaaebc299fc40f7623146e8;p=ghc-base.git

Remove unnecessary parens
---

diff --git a/GHC/Float.lhs b/GHC/Float.lhs
index 3059db9..0d535c5 100644
--- a/GHC/Float.lhs
+++ b/GHC/Float.lhs
@@ -205,7 +205,7 @@ instance  RealFrac Float  where
 #error FLT_RADIX must be 2
 #endif
     properFraction (F# x#)
-      = case (decodeFloat_Int# x#) of
+      = case decodeFloat_Int# x# of
         (# m#, n# #) ->
             let m = I# m#
                 n = I# n#