Mercurial > hg > octave-lyh

diff scripts/general/isa.m @ 11449:93b8c7ca211f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
isa.m: Add tests against logical types
author Rik <octave@nomad.inbox5.com>
date Wed, 05 Jan 2011 21:21:37 -0800
parents 0d9640d755b1
children fd0a3ac60b0e
line wrap: on
line diff
--- a/scripts/general/isa.m
+++ b/scripts/general/isa.m
@@ -52,6 +52,7 @@
 endfunction
 
 %!assert (isa ("char", "float"), false)
+%!assert (isa (logical (1), "float"), false)
 %!assert (isa (double (13), "float"), true)
 %!assert (isa (single (13), "float"), true)
 %!assert (isa (int8 (13), "float"), false)
@@ -63,6 +64,7 @@
 %!assert (isa (uint32 (13), "float"), false)
 %!assert (isa (uint64 (13), "float"), false)
 %!assert (isa ("char", "numeric"), false)
+%!assert (isa (logical (1), "numeric"), false)
 %!assert (isa (double (13), "numeric"), true)
 %!assert (isa (single (13), "numeric"), true)
 %!assert (isa (int8 (13), "numeric"), true)