changeset 11929:ec4877888285 release-3-0-x

use relative tols in randp tests
author Jaroslav Hajek <highegg@gmail.com>
date Fri, 23 Jan 2009 14:10:55 +0100
parents 553874dbba84
children 5032328e940b
files src/ChangeLog src/DLD-FUNCTIONS/rand.cc
diffstat 2 files changed, 6 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2009-01-23  Jaroslav Hajek  <highegg@gmail.com>
+
+	* DLD-FUNCTIONS/ranpd.cc: Use relative tolerance for randp tests.
+
 2008-12-26  Francesco Potortì  <pot@gnu.org>
 
 	* data.cc (resize): Add cross reference to postpad.
--- a/src/DLD-FUNCTIONS/rand.cc
+++ b/src/DLD-FUNCTIONS/rand.cc
@@ -938,7 +938,7 @@
 %!test
 %! % Test fixed state
 %! randp("state",1);
-%! assert(randp(1e9,1,6),[999915677 999976657 1000047684 1000019035 999985749 999977692],1e-6)
+%! assert(randp(1e9,1,6),[999915677 999976657 1000047684 1000019035 999985749 999977692],-1e-6)
 %!test
 %! % Test fixed state
 %! randp("seed",1);
@@ -951,7 +951,7 @@
 %!test
 %! % Test fixed state
 %! randp("seed",1);
-%! assert(randp(1e9,1,6),[1000006208 1000012224 999981120 999963520 999963072 999981440],1e-6)
+%! assert(randp(1e9,1,6),[1000006208 1000012224 999981120 999963520 999963072 999981440],-1e-6)
 %!test
 %! if (__random_statistical_tests__)
 %!   % statistical tests may fail occasionally.