rangeTest: Fix type for "CSigAtomic R" test
authorBen Gamari <bgamari.foss@gmail.com>
Fri, 22 Aug 2014 21:41:42 +0000 (17:41 -0400)
committerBen Gamari <bgamari.foss@gmail.com>
Fri, 22 Aug 2014 21:41:42 +0000 (17:41 -0400)
tests/rangeTest.hs

index e59f0d6..ac62c71 100644 (file)
@@ -121,7 +121,7 @@ main =
     checkBounds "CPtrdiff R"   (False,-100,100)  (approxBounds (randomR (-100,100)) trials (undefined:: CPtrdiff))
     checkBounds "CSize R"      (False,0,200)     (approxBounds (randomR (0,200))    trials (undefined:: CSize))
     checkBounds "CWchar R"     (False,0,100)     (approxBounds (randomR (0,100))    trials (undefined:: CWchar))
-    checkBounds "CSigAtomic R" (False,0,100)     (approxBounds (randomR (0,100))    trials (undefined:: CWchar))
+    checkBounds "CSigAtomic R" (False,0,100)     (approxBounds (randomR (0,100))    trials (undefined:: CSigAtomic))
     checkBounds "CLLong R"     (False,-100,100)  (approxBounds (randomR (-100,100)) trials (undefined:: CLLong))
     checkBounds "CULLong R"    (False,0,200)     (approxBounds (randomR (0,200))    trials (undefined:: CULLong))
     checkBounds "CIntPtr R"    (False,-100,100)  (approxBounds (randomR (-100,100)) trials (undefined:: CIntPtr))