[commit: packages/random] master: rangeTest: Fix type for "CSigAtomic R" test (3000397)
git at git.haskell.org
git at git.haskell.org
Thu Mar 19 15:45:15 UTC 2015
Repository : ssh://git@git.haskell.org/random
On branch : master
Link : http://git.haskell.org/packages/random.git/commitdiff/3000397a8a60ac9f744171a1b30e60b6aa3720d7
>---------------------------------------------------------------
commit 3000397a8a60ac9f744171a1b30e60b6aa3720d7
Author: Ben Gamari <bgamari.foss at gmail.com>
Date: Fri Aug 22 17:41:42 2014 -0400
rangeTest: Fix type for "CSigAtomic R" test
>---------------------------------------------------------------
3000397a8a60ac9f744171a1b30e60b6aa3720d7
tests/rangeTest.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/tests/rangeTest.hs b/tests/rangeTest.hs
index e59f0d6..ac62c71 100644
--- a/tests/rangeTest.hs
+++ b/tests/rangeTest.hs
@@ -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))
More information about the ghc-commits
mailing list