Mercurial > octave-nkf

changeset 7778:97b7ba81e1c3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
isa.m: fnumeric -> numeric
author David Bateman <dbateman@free.fr>
date Mon, 19 May 2008 17:35:39 -0400
parents 221fe75ac5c9
children 791231dac333
files scripts/general/isa.m
diffstat 1 files changed, 12 insertions(+), 12 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/general/isa.m	Mon May 19 16:05:36 2008 -0400
+++ b/scripts/general/isa.m	Mon May 19 17:35:39 2008 -0400
@@ -38,7 +38,7 @@
 
   if (strcmp (cname, "float"))
     retval = any (strcmp (class (x), float_classes));
-  elseif (strcmp (cname, "fnumeric"))
+  elseif (strcmp (cname, "numeric"))
     retval = any (strcmp (class (x), fnum_classes));
   else
     retval = strcmp (class (x), cname);
@@ -57,14 +57,14 @@
 %!assert (isa (uint16 (13), "float"), false)
 %!assert (isa (uint32 (13), "float"), false)
 %!assert (isa (uint64 (13), "float"), false)
-%!assert (isa ("char", "fnumeric"), false)
-%!assert (isa (double (13), "fnumeric"), true)
-%!assert (isa (single (13), "fnumeric"), true)
-%!assert (isa (int8 (13), "fnumeric"), true)
-%!assert (isa (int16 (13), "fnumeric"), true)
-%!assert (isa (int32 (13), "fnumeric"), true)
-%!assert (isa (int64 (13), "fnumeric"), true)
-%!assert (isa (uint8 (13), "fnumeric"), true)
-%!assert (isa (uint16 (13), "fnumeric"), true)
-%!assert (isa (uint32 (13), "fnumeric"), true)
-%!assert (isa (uint64 (13), "fnumeric"), true)
+%!assert (isa ("char", "numeric"), false)
+%!assert (isa (double (13), "numeric"), true)
+%!assert (isa (single (13), "numeric"), true)
+%!assert (isa (int8 (13), "numeric"), true)
+%!assert (isa (int16 (13), "numeric"), true)
+%!assert (isa (int32 (13), "numeric"), true)
+%!assert (isa (int64 (13), "numeric"), true)
+%!assert (isa (uint8 (13), "numeric"), true)
+%!assert (isa (uint16 (13), "numeric"), true)
+%!assert (isa (uint32 (13), "numeric"), true)
+%!assert (isa (uint64 (13), "numeric"), true)