Mercurial > hg > octave-nkf
diff src/octave.cc @ 2495:29cd3862a9dc
[project @ 1996-11-11 02:39:49 by jwe]
author | jwe |
---|---|
date | Mon, 11 Nov 1996 02:42:44 +0000 |
parents | 06595bc7f2d0 |
children | fda09c1e787e |
line wrap: on
line diff
--- a/src/octave.cc +++ b/src/octave.cc @@ -171,18 +171,9 @@ { if (argc > 1) { - int max_len = 0; - for (int i = 1; i < argc; i++) - { - int tmp_len = strlen (argv[i]); - if (tmp_len > max_len) - max_len = tmp_len; - } + // Skip program name in argv. - octave_argv.resize (argc-1); - - for (int i = 1; i < argc; i++) - octave_argv[i-1] = argv[i]; + octave_argv = string_vector (argv+1, argc-1); bind_builtin_variable ("argv", octave_argv, 1, 1, 0); bind_builtin_variable ("__argv__", octave_argv, 1, 1, 0);