# HG changeset patch
# User Ben Abbott <address@hidden>
# Date 1219803148 14400
# Node ID 2e591a64d487c6a80836f826ebcc4b516b25c336
# Parent  6333da0dfdfde7945fd8bfc13a36789358042027
Adjust tolerance to single precision test.

diff -r 6333da0dfdfd -r 2e591a64d487 src/ChangeLog
--- a/src/ChangeLog	Tue Aug 26 18:05:13 2008 -0400
+++ b/src/ChangeLog	Tue Aug 26 22:12:28 2008 -0400
@@ -1,3 +1,7 @@
+2008-08-26 Ben Abbott <address@hidden>
+
+	* mappers.cc (test): Adjust tolerance for single precesion tests.
+
 2008-08-26  Jaroslav Hajek <address@hidden>
 
 	* parse.y (Fassignin): Use default  scope when calling varref.
diff -r 6333da0dfdfd -r 2e591a64d487 src/mappers.cc
--- a/src/mappers.cc	Tue Aug 26 18:05:13 2008 -0400
+++ b/src/mappers.cc	Tue Aug 26 22:12:28 2008 -0400
@@ -217,7 +217,7 @@
 %!assert(arg (single(i)), single(pi/2));
 %!assert(arg (single(-1)), single(pi));
 %!assert(arg (single(-i)), single(-pi/2));
-%!assert(arg (single([1, i; -1, -i])), single([0, pi/2; pi, -pi/2]));
+%!assert(arg (single([1, i; -1, -i])), single([0, pi/2; pi, -pi/2]), 2e1*eps('single'));
 
 %!error arg ();
 %!error arg (1, 2);
@@ -1185,7 +1185,7 @@
 %!assert(log ([-0.5, -1.5, -2.5]), log([0.5, 1.5, 2.5]) + pi*1i, sqrt (eps));
 
 %!assert(log (single([1, e, e^2])), single([0, 1, 2]), 4*sqrt (eps));
-%!assert(log (single([-0.5, -1.5, -2.5])), single(log([0.5, 1.5, 2.5]) + pi*1i), sqrt (eps));
+%!assert(log (single([-0.5, -1.5, -2.5])), single(log([0.5, 1.5, 2.5]) + pi*1i), 4*eps('single'));
 
 %!error log ();
 %!error log (1, 2);