core: Set argv for mescc too.
* src/mes.c (main)[!__MESC__]: Remove branch.
This commit is contained in:
parent
c8262dac34
commit
2418540c67
|
@ -1354,9 +1354,7 @@ main (int argc, char *argv[])
|
|||
#endif
|
||||
|
||||
SCM lst = cell_nil;
|
||||
#if !__MESC__
|
||||
for (int i=argc-1; i>=0; i--) lst = cons (MAKE_STRING (cstring_to_list (argv[i])), lst);
|
||||
#endif
|
||||
r0 = acons (cell_symbol_argv, lst, r0);
|
||||
push_cc (r2, cell_unspecified, r0, cell_unspecified);
|
||||
if (g_debug > 1)
|
||||
|
|
Loading…
Reference in New Issue