Mercurial > octave

changeset 26198:d57d30caffd6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add BISTS tests for iscomplex(). * data.cc (Fiscomplex): Add BIST tests.
author Rik <rik@octave.org>
date Mon, 10 Dec 2018 17:22:04 -0800
parents 95633ec174cf
children 704cd93ca748
files libinterp/corefcn/data.cc
diffstat 1 files changed, 19 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/libinterp/corefcn/data.cc	Mon Dec 10 17:06:44 2018 -0800
+++ b/libinterp/corefcn/data.cc	Mon Dec 10 17:22:04 2018 -0800
@@ -3251,6 +3251,25 @@
   return ovl (args(0).iscomplex ());
 }
 
+
+/*
+%!assert (iscomplex (4), false)
+%!assert (iscomplex (i), true)
+%!assert (iscomplex (4+3i), true)
+%!assert (iscomplex ([1, 2, 3]), false)
+%!assert (iscomplex ([1, 2i, 3]), true)
+
+%!assert (iscomplex (0j), false)
+%!assert (iscomplex (complex (0,0)), true)
+%!assert (iscomplex ("4"), false)
+%!assert (iscomplex ({i}), false)
+
+## Test input validation
+%!error iscomplex ()
+%!error iscomplex (1, 2)
+*/
+
+
 DEFUN (isfloat, args, ,
        doc: /* -*- texinfo -*-
 @deftypefn {} {} isfloat (@var{x})