Mercurial > octave

diff src/log.cc @ 712:36ba0576bd1b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-09-19 14:18:15 by jwe]
author jwe
date Mon, 19 Sep 1994 14:18:48 +0000
parents 0a81458ef677
children e81d3a66725e
line wrap: on
line diff
--- a/src/log.cc	Sun Sep 18 23:34:35 1994 +0000
+++ b/src/log.cc	Mon Sep 19 14:18:48 1994 +0000
@@ -42,13 +42,15 @@
 {
   Octave_object retval;
 
-  if (args.length () != 2)
+  int nargin = args.length ();
+
+  if (nargin != 1)
     {
       print_usage ("logm");
       return retval;
     }
 
-  tree_constant arg = args(1);
+  tree_constant arg = args(0);
     
   if (empty_arg ("logm", arg.rows (), arg.columns ()) < 0)
     return retval;
@@ -148,13 +150,15 @@
 {
   Octave_object retval;
 
-  if (args.length () != 2)
+  int nargin = args.length ();
+
+  if (nargin != 1)
     {
       print_usage ("sqrtm");
       return retval;
     }
 
-  tree_constant arg = args(1);
+  tree_constant arg = args(0);
     
   if (empty_arg ("sqrtm", arg.rows (), arg.columns ()))
     return retval;