Mercurial > hg > octave-nkf
changeset 2822:7cacd6c766d2
[project @ 1997-03-24 19:13:01 by jwe]
author | jwe |
---|---|
date | Mon, 24 Mar 1997 19:13:01 +0000 |
parents | 044d25a60ea1 |
children | 7ffbb34efd2d |
files | src/ov-typeinfo.cc |
diffstat | 1 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ov-typeinfo.cc +++ b/src/ov-typeinfo.cc @@ -215,7 +215,11 @@ } DEFUN (typeinfo, args, , - "usage: typeinfo ([typename])") + "usage: typeinfo (expr)\n\ +\n\ +Return the type of the expression EXPR, as a string. If EXPR is\n\ +omitted, return an array of strings containing all the currently\n\ +installed data types.") { octave_value retval; @@ -223,6 +227,8 @@ if (nargin == 0) retval = octave_value_typeinfo::installed_type_names (); + else if (nargin == 1) + retval = args(0).type_name (); else print_usage ("typeinfo");