core: Set argv for mescc too.
authorJan Nieuwenhuizen <janneke@gnu.org>
Mon, 24 Apr 2017 05:22:04 +0000 (07:22 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Mon, 24 Apr 2017 05:22:04 +0000 (07:22 +0200)
* src/mes.c (main)[!__MESC__]: Remove branch.

src/mes.c

index 747ce191ea1f7273e5c42065b040ae7045880f36..617f0c0cfc7f5ee63a51701a7c5c7d5f86bd1fcf 100644 (file)
--- a/src/mes.c
+++ b/src/mes.c
@@ -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)