Mercurial > hg > octave-thorsten

changeset 4028:ef75c970c8f5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-08-09 07:19:02 by jwe]
author jwe
date Fri, 09 Aug 2002 07:19:02 +0000
parents af3a0264eefc
children 2cc57b6169cf
files scripts/ChangeLog src/ChangeLog src/data.cc src/file-io.cc src/variables.cc
diffstat 5 files changed, 45 insertions(+), 25 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,5 +1,17 @@
 2002-08-09  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* deprecated/is_bool.m: New file.
+	* deprecated/is_complex.m: New file.
+	* deprecated/is_global.m: New file.
+	* deprecated/is_list.m: New file.
+	* deprecated/is_matrix.m: New file.
+	* deprecated/is_scalar.m: New file.
+	* deprecated/is_square.m: New file.
+	* deprecated/is_stream.m: New file.
+	* deprecated/is_struct.m: New file.
+	* deprecated/is_symmetric.m: New file.
+	* deprecated/is_vector.m: New file.
+
 	* general/isscalar.m: Rename from is_scalar.m.
 	* general/issquare.m: Rename from is_square.m.
 	* general/issymmetric.m: Rename from is_symmetric.m.
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,13 @@
 2002-08-09  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* variables.cc (Fisglobal): Rename from Fis_global.
+	* file-io.cc (Fisstream): Rename from Fis_stream.
+	* data.cc (Fisbool): Rename from Fis_bool.
+	(Fiscomplex): Rename from Fis_complex.
+	(Fislist): Rename from Fis_list.
+	(Fismatrix): Rename from Fis_matrix.
+	(Fisstruct): Rename from Fis_struct.
+
 	* parse.y (switch_case): Make list of command optional.
 
 2002-08-08  John W. Eaton  <jwe@bevo.che.wisc.edu>
--- a/src/data.cc
+++ b/src/data.cc
@@ -700,9 +700,9 @@
   DATA_REDUCTION (sumsq);
 }
 
-DEFUN (is_bool, args, ,
+DEFUN (isbool, args, ,
   "-*- texinfo -*-\n\
-@deftypefn {Built-in Functio} {} is_bool (@var{x})\n\
+@deftypefn {Built-in Functio} {} isbool (@var{x})\n\
 Return true if @var{x} is a boolean object.\n\
 @end deftypefn")
 {
@@ -711,16 +711,16 @@
   if (args.length () == 1)
     retval = args(0).is_bool_type ();
   else
-    print_usage ("is_bool");
+    print_usage ("isbool");
 
   return retval;
 }
 
-DEFALIAS (islogical, is_bool);
+DEFALIAS (islogical, isbool);
 
-DEFUN (is_complex, args, ,
+DEFUN (iscomplex, args, ,
   "-*- texinfo -*-\n\
-@deftypefn {Built-in Function} {} is_complex (@var{x})\n\
+@deftypefn {Built-in Function} {} iscomplex (@var{x})\n\
 Return true if @var{x} is a complex-valued numeric object.\n\
 @end deftypefn")
 {
@@ -729,7 +729,7 @@
   if (args.length () == 1)
     retval = args(0).is_complex_type ();
   else
-    print_usage ("is_complex");
+    print_usage ("iscomplex");
 
   return retval;
 }
@@ -790,9 +790,9 @@
   return retval;
 }
 
-DEFUN (is_list, args, ,
+DEFUN (islist, args, ,
   "-*- texinfo -*-\n\
-@deftypefn {Built-in Function} {} is_list (@var{x})\n\
+@deftypefn {Built-in Function} {} islist (@var{x})\n\
 Return nonzero if @var{x} is a list.\n\
 @end deftypefn")
 {
@@ -801,14 +801,14 @@
   if (args.length () == 1)
     retval = args(0).is_list ();
   else
-    print_usage ("is_list");
+    print_usage ("islist");
 
   return retval;
 }
 
-DEFUN (is_matrix, args, ,
+DEFUN (ismatrix, args, ,
   "-*- texinfo -*-\n\
-@deftypefn {Built-in Function} {} is_matrix (@var{a})\n\
+@deftypefn {Built-in Function} {} ismatrix (@var{a})\n\
 Return 1 if @var{a} is a matrix.  Otherwise, return 0.\n\
 @end deftypefn")
 {
@@ -824,14 +824,14 @@
 	retval = static_cast<double> (arg.rows () >= 1 && arg.columns () >= 1);
     }
   else
-    print_usage ("is_matrix");
+    print_usage ("ismatrix");
 
   return retval;
 }
 
-DEFUN (is_struct, args, ,
+DEFUN (isstruct, args, ,
   "-*- texinfo -*-\n\
-@deftypefn {Built-in Function} {} is_struct (@var{expr})\n\
+@deftypefn {Built-in Function} {} isstruct (@var{expr})\n\
 Return 1 if the value of the expression @var{expr} is a structure.\n\
 @end deftypefn")
 {
@@ -840,7 +840,7 @@
   if (args.length () == 1)
     retval = args(0).is_map ();
   else
-    print_usage ("is_struct");
+    print_usage ("isstruct");
 
   return retval;
 }
--- a/src/file-io.cc
+++ b/src/file-io.cc
@@ -134,9 +134,9 @@
   return retval;
 }
 
-DEFUN (is_stream, args, ,
+DEFUN (isstream, args, ,
   "-*- texinfo -*-\n\
-@deftypefn {Built-in Function} {} is_stream (@var{x})\n\
+@deftypefn {Built-in Function} {} isstream (@var{x})\n\
 Return true if @var{x} is a stream object.  Otherwise, return false.\n\
 @end deftypefn")
 {
@@ -145,7 +145,7 @@
   if (args.length () == 1)
     retval = args(0).is_stream ();
   else
-    print_usage ("is_stream");
+    print_usage ("isstream");
 
   return retval;
 }
--- a/src/variables.cc
+++ b/src/variables.cc
@@ -324,28 +324,28 @@
   return retval;
 }
 
-DEFUN (is_global, args, ,
+DEFUN (isglobal, args, ,
   "-*- texinfo -*-\n\
-@deftypefn {Built-in Function} {} is_global (@var{name})\n\
+@deftypefn {Built-in Function} {} isglobal (@var{name})\n\
 Return 1 if @var{name} is globally visible.  Otherwise, return 0.  For\n\
 example,\n\
 \n\
 @example\n\
 @group\n\
 global x\n\
-is_global (\"x\")\n\
+isglobal (\"x\")\n\
      @result{} 1\n\
 @end group\n\
 @end example\n\
 @end deftypefn")
 {
-  octave_value_list retval = 0.0;
+  octave_value retval = 0.0;
 
   int nargin = args.length ();
 
   if (nargin != 1)
     {
-      print_usage ("is_global");
+      print_usage ("isglobal");
       return retval;
     }
 
@@ -353,7 +353,7 @@
 
   if (error_state)
     {
-      error ("is_global: expecting std::string argument");
+      error ("isglobal: expecting std::string argument");
       return retval;
     }