[commit: packages/random] new_api: Reactivated big Integer tests that were deactivated on the master branch. (5541f8c)
git at git.haskell.org
git at git.haskell.org
Thu Mar 19 15:44:26 UTC 2015
Repository : ssh://git@git.haskell.org/random
On branch : new_api
Link : http://git.haskell.org/packages/random.git/commitdiff/5541f8cdca26657cfc18bd6d101870e7c3a913a2
>---------------------------------------------------------------
commit 5541f8cdca26657cfc18bd6d101870e7c3a913a2
Author: Ryan Newton <rrnewton at gmail.com>
Date: Wed Jun 29 13:28:46 2011 -0400
Reactivated big Integer tests that were deactivated on the master branch.
>---------------------------------------------------------------
5541f8cdca26657cfc18bd6d101870e7c3a913a2
tests/rangeTest.hs | 4 ++--
tests/rangeTest.stdout | 2 ++
2 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/tests/rangeTest.hs b/tests/rangeTest.hs
index 704a36c..88f736d 100644
--- a/tests/rangeTest.hs
+++ b/tests/rangeTest.hs
@@ -58,8 +58,8 @@ main =
do
checkBounds "Int" (intRange nb) (approxBounds random trials (undefined::Int))
checkBounds "Integer" (intRange nb) (approxBounds random trials (undefined::Integer))
--- checkBounds "Integer Rbig" (False,-(2^500), 2^500) (approxBounds (randomR (-(2^500), 2^500)) trials (undefined::Integer))
--- checkBounds "Integer RbigPos" (False,1,2^5000) (approxBounds (randomR (1,2^5000)) trials (undefined::Integer))
+ checkBounds "Integer Rbig" (False,-(2^500), 2^500) (approxBounds (randomR (-(2^500), 2^500)) trials (undefined::Integer))
+ checkBounds "Integer RbigPos" (False,1,2^5000) (approxBounds (randomR (1,2^5000)) trials (undefined::Integer))
checkBounds "Int8" (intRange 8) (approxBounds random trials (undefined::Int8))
checkBounds "Int16" (intRange 16) (approxBounds random trials (undefined::Int16))
checkBounds "Int32" (intRange 32) (approxBounds random trials (undefined::Int32))
diff --git a/tests/rangeTest.stdout b/tests/rangeTest.stdout
index 55ccaff..f9d9479 100644
--- a/tests/rangeTest.stdout
+++ b/tests/rangeTest.stdout
@@ -1,5 +1,7 @@
Int: Passed
Integer: Passed
+Integer Rbig: Passed
+Integer RbigPos: Passed
Int8: Passed
Int16: Passed
Int32: Passed
More information about the ghc-commits
mailing list