Mercurial > hg > octave-max

changeset 8989:46a12e3f882c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
have zero tolerance force numeric assert
author Jaroslav Hajek <highegg@gmail.com>
date Tue, 17 Mar 2009 12:38:46 +0100
parents 315828058e0d
children 349d75161672
files scripts/testfun/assert.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/testfun/assert.m
+++ b/scripts/testfun/assert.m
@@ -141,7 +141,7 @@
       iserror = 1;
       coda = "Dimensions don't match";
 
-    elseif (tol == 0 && ! strcmp (typeinfo (cond), typeinfo (expected)))
+    elseif (nargin < 3 && ! strcmp (typeinfo (cond), typeinfo (expected)))
       iserror = 1;
       coda = cstrcat ("Type ", typeinfo (cond), " != ", typeinfo (expected));