X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fruntime.c;h=5bf3f4db8b5a87ea35b8b62a6da9bdaa30d2739d;hb=230707c1899c1c008f7ce2ad97e2fd04849f7443;hp=b547453c8dde469d8c9bd965869ede771eb2417d;hpb=2561033fd3ed9e224dffc445262e097e5abfa920;p=sbcl.git diff --git a/src/runtime/runtime.c b/src/runtime/runtime.c index b547453..5bf3f4d 100644 --- a/src/runtime/runtime.c +++ b/src/runtime/runtime.c @@ -271,20 +271,20 @@ main(int argc, char *argv[], char *envp[]) /* As in "--help" case, I think this is expected. */ print_version(); exit(0); - } else if (0 == strcmp(arg, "--debug-environment")) { - int n = 0; - printf("; Commandline arguments:\n"); - while (n < argc) { - printf("; %2d: \"%s\"\n", n, argv[n]); - ++n; - } - n = 0; - printf(";\n; Environment:\n"); - while (ENVIRON[n]) { - printf("; %2d: \"%s\"\n", n, ENVIRON[n]); - ++n; - } - ++argi; + } else if (0 == strcmp(arg, "--debug-environment")) { + int n = 0; + printf("; Commandline arguments:\n"); + while (n < argc) { + printf("; %2d: \"%s\"\n", n, argv[n]); + ++n; + } + n = 0; + printf(";\n; Environment:\n"); + while (ENVIRON[n]) { + printf("; %2d: \"%s\"\n", n, ENVIRON[n]); + ++n; + } + ++argi; } else if (0 == strcmp(arg, "--end-runtime-options")) { end_runtime_options = 1; ++argi;