Small whitespace tweaks

tests/Tests/Properties.hs

--- | General quicktest properties for the text library
---
+-- | QuickCheck properties for the text library.
+
 {-# LANGUAGE BangPatterns, FlexibleInstances, OverloadedStrings,
              ScopedTypeVariables, TypeSynonymInstances #-}
-{-# OPTIONS_GHC -fno-enable-rewrite-rules #-}
-{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
+{-# OPTIONS_GHC -fno-enable-rewrite-rules -fno-warn-missing-signatures #-}
 module Tests.Properties
     (
       tests
@@ -784,7 +783,8 @@ showFloat TB.Exponent = showEFloat
 showFloat TB.Fixed    = showFFloat
 showFloat TB.Generic  = showGFloat
 
-tb_formatRealFloat :: (RealFloat a, Show a) => a -> TB.FPFormat -> Precision a -> Property
+tb_formatRealFloat :: (RealFloat a, Show a) =>
+                      a -> TB.FPFormat -> Precision a -> Property
 tb_formatRealFloat a fmt prec =
     TB.formatRealFloat fmt p a ===
     TB.fromString (showFloat fmt p a "")

tests/Tests/QuickCheckUtils.hs

@@ -12,9 +12,9 @@ module Tests.QuickCheckUtils
 
     , BigBounded(..)
     , BigInt(..)
-    , NotEmpty (..)
+    , NotEmpty(..)
 
-    , Small (..)
+    , Small(..)
     , small
 
     , Precision(..)
@@ -22,14 +22,14 @@ module Tests.QuickCheckUtils
 
     , integralRandomR
 
-    , DecodeErr (..)
+    , DecodeErr(..)
     , genDecodeErr
 
-    , Stringy (..)
+    , Stringy(..)
     , eq
     , eqP
 
-    , Encoding (..)
+    , Encoding(..)
 
     , write_read
     ) where
@@ -43,7 +43,7 @@ import Data.Text.Foreign (I16)
 import Data.Text.Lazy.Builder.RealFloat (FPFormat(..))
 import Data.Word (Word8, Word16)
 import Debug.Trace (trace)
-import System.Random (Random (..), RandomGen)
+import System.Random (Random(..), RandomGen)
 import Test.QuickCheck hiding (Fixed(..), Small (..), (.&.))
 import Test.QuickCheck.Monadic (assert, monadicIO, run)
 import Test.QuickCheck.Unicode (string)