Mercurial > hg > octave-lyh

diff src/variables.cc @ 742:9004af8c7a33

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-09-30 14:50:32 by jwe]
author jwe
date Fri, 30 Sep 1994 14:53:08 +0000
parents 9b930afbf477
children e666a6ab8f83
line wrap: on
line diff
--- a/src/variables.cc
+++ b/src/variables.cc
@@ -1145,11 +1145,12 @@
 
   int nargin = args.length ();
 
-  Octave_object tmp_args = args;
+  Octave_object tmp_args;
+  for (int i = nargin; i > 0; i--)
+    tmp_args(i) = args(i-1);
+  tmp_args(0) = "-long";
 
-  tmp_args(nargin) = "-long";
-
-  int argc = nargin + 1;
+  int argc = tmp_args.length () + 1;
   char **argv = make_argv (tmp_args, "whos");
 
   if (error_state)