Mercurial > octave-nkf
comparison src/data.cc @ 3238:041ea33fbbf4
[project @ 1999-03-26 17:48:16 by jwe]
author | jwe |
---|---|
date | Fri, 26 Mar 1999 17:48:35 +0000 |
parents | bc3fdfe311a3 |
children | 4964d5391acc |
comparison
equal
deleted
inserted
replaced
3237:737b219ab65a | 3238:041ea33fbbf4 |
---|---|
807 octave_value retval; | 807 octave_value retval; |
808 | 808 |
809 if (args.length () == 1) | 809 if (args.length () == 1) |
810 retval = args(0).is_numeric_type () ? 1.0 : 0.0; | 810 retval = args(0).is_numeric_type () ? 1.0 : 0.0; |
811 else | 811 else |
812 print_usage ("is_list"); | 812 print_usage ("isnumeric"); |
813 | 813 |
814 return retval; | 814 return retval; |
815 } | 815 } |
816 | 816 |
817 DEFUN (is_list, args, , | 817 DEFUN (is_list, args, , |