Mercurial > hg > octave-nkf
diff src/utils.cc @ 712:36ba0576bd1b
[project @ 1994-09-19 14:18:15 by jwe]
author | jwe |
---|---|
date | Mon, 19 Sep 1994 14:18:48 +0000 |
parents | d7c4962ec7a0 |
children | 02814aea28c8 |
line wrap: on
line diff
--- a/src/utils.cc +++ b/src/utils.cc @@ -498,7 +498,7 @@ all_strings (const Octave_object& args) { int n = args.length (); - for (int i = 1; i < n; i++) + for (int i = 0; i < n; i++) if (! args(i).is_string ()) return 0; return 1; @@ -513,8 +513,8 @@ int n = args.length (); argv = new char * [n + 1]; argv[0] = strsave (fcn_name); - for (int i = 1; i < n; i++) - argv[i] = strsave (args(i).string_value ()); + for (int i = 0; i < n; i++) + argv[i+1] = strsave (args(i).string_value ()); } else error ("%s: expecting all arguments to be strings", fcn_name);