The tests for functions acker and place of the control package fail under
Octave 3.0.5 with errors like the one below. I did not check against
3.1.55. For the Debian package, I am applying the patch attached below.
Please, tell me whether I should commit it to SVN.
Rafael Laboissiere
===========================================================================
octave:1> test place
***** assert (place (ss (A, B, C), P), Kexpected);
!!!!! test failed
error: assert (place (ss (A, B, C), P),Kexpected) expected
3.5000 3.5000
but got
3.5000 3.5000
values do not match
shared variables {
A =
0 1
3 2
B =
0
1
C =
2 1
P =
-1.00000 -0.50000
Kexpected =
3.5000 3.5000
}
Get around precision problems when testing functions acker and place
-- Rafael Laboissiere <[email protected]> Fri, 22 May 2009 14:34:21 +0200
--- a/inst/acker.m
+++ b/inst/acker.m
@@ -43,4 +43,4 @@
%! B = [0; 1];
%! P = [-1 -0.5];
%! Kexpected = [3.5 3.5];
-%! assert (acker (A, B, P), Kexpected);
\ No newline at end of file
+%! assert (acker (A, B, P), Kexpected, 2*eps);
\ No newline at end of file
--- a/inst/place.m
+++ b/inst/place.m
@@ -135,5 +135,5 @@
%! C = [2 1]; # C is useful to use ss; it doesn't matter what the value of C is
%! P = [-1 -0.5];
%! Kexpected = [3.5 3.5];
-%!assert (place (ss (A, B, C), P), Kexpected);
-%!assert (place (A, B, P), Kexpected);
\ No newline at end of file
+%!assert (place (ss (A, B, C), P), Kexpected, 2*eps);
+%!assert (place (A, B, P), Kexpected, 2*eps);
\ No newline at end of file
------------------------------------------------------------------------------
Register Now for Creativity and Technology (CaT), June 3rd, NYC. CaT
is a gathering of tech-side developers & brand creativity professionals. Meet
the minds behind Google Creative Lab, Visual Complexity, Processing, &
iPhoneDevCamp asthey present alongside digital heavyweights like Barbarian
Group, R/GA, & Big Spaceship. http://www.creativitycat.com
_______________________________________________
Octave-dev mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/octave-dev
