# HG changeset patch
# User Rik <octave@nomad.inbox5.com>
# Date 1294291297 28800
# Node ID 93b8c7ca211fb8d96d1b7cf5425458e3aae93221
# Parent  277403af093057eaf2a4e8741579bb9b156c55a1
isa.m: Add tests against logical types

diff -r 277403af0930 -r 93b8c7ca211f scripts/ChangeLog
--- 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.
diff -r 277403af0930 -r 93b8c7ca211f scripts/general/isa.m
--- 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)