Silence warning.
authorLennart Kolmodin <kolmodin@gmail.com>
Mon, 11 Apr 2016 20:14:45 +0000 (22:14 +0200)
committerLennart Kolmodin <kolmodin@gmail.com>
Mon, 11 Apr 2016 20:14:45 +0000 (22:14 +0200)
benchmarks/Put.hs

index c713a0e..52b5ca1 100644 (file)
@@ -89,10 +89,10 @@ smallIntegers = [0..10000]
 {-# NOINLINE smallIntegers #-}
 
 bigIntegers :: [Integer]
-bigIntegers = [max .. max + 10000]
+bigIntegers = [m .. m + 10000]
   where
-    max :: Integer
-    max = fromIntegral (maxBound :: Word64)
+    m :: Integer
+    m = fromIntegral (maxBound :: Word64)
 {-# NOINLINE bigIntegers #-}
 
 smallByteStrings :: [S.ByteString]