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");