Mercurial > octave-nkf

changeset 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 277403af0930
children 5eb10763069f
files scripts/ChangeLog scripts/general/isa.m
diffstat 2 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Wed Jan 05 21:11:24 2011 -0800
+++ b/scripts/ChangeLog	Wed Jan 05 21:21:37 2011 -0800
@@ -1,3 +1,7 @@
+2011-01-05  Rik  <octave@nomad.inbox5.com>
+
+	* general/isa.m: Add tests against logical values.
+
 2011-01-04  Rik  <octave@nomad.inbox5.com>
 
 	* testfun/demo.m: Add newline to error output for better formatting.
--- a/scripts/general/isa.m	Wed Jan 05 21:11:24 2011 -0800
+++ b/scripts/general/isa.m	Wed Jan 05 21:21:37 2011 -0800
@@ -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)