# HG changeset patch
# User Rik <octave@nomad.inbox5.com>
# Date 1310843167 25200
# Node ID ce1fb93d884d4604f37ea0dbb9925772690581b7
# Parent  8c4605b4d0c883546ee6002ed3ad1d9d5fbff70e
codesprint: Add tests for isnull()

* ov-null-mat.cc: Add tests for isnull()

diff -r 8c4605b4d0c8 -r ce1fb93d884d src/ov-null-mat.cc
--- a/src/ov-null-mat.cc	Sat Jul 16 14:05:29 2011 -0500
+++ b/src/ov-null-mat.cc	Sat Jul 16 12:06:07 2011 -0700
@@ -118,3 +118,17 @@
   return retval;
 }
 
+/*
+
+%!assert (isnull ([]), true)
+%!assert (isnull ([1]), false)
+%!assert (isnull (zeros (0,3)), false)
+%!assert (isnull (""), true)
+%!assert (isnull ("A"), false)
+%!assert (isnull (''), true)
+%!assert (isnull ('A'), false)
+%!test
+%! x = [];
+%! assert (isnull (x), false);
+
+*/