Mercurial > hg > octave-nkf

diff src/ov-typeinfo.cc @ 2822:7cacd6c766d2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-03-24 19:13:01 by jwe]
author jwe
date Mon, 24 Mar 1997 19:13:01 +0000
parents 9aeba8e006a4
children 8b262e771614
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");