X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fscheme%2Ftest%2Fao_scheme_test.c;fp=src%2Fscheme%2Ftest%2Fao_scheme_test.c;h=195b8b469c672bd79ec1c39f1b29067fc3d75396;hb=283553f0f118cef1dbcfbf5e86a43575a610d27f;hp=ed10d3beba1de5d1e3ea2f247cf313cb56873ff8;hpb=48d164e3d4b2ef27fae20fae63b8014803a7b178;p=fw%2Faltos diff --git a/src/scheme/test/ao_scheme_test.c b/src/scheme/test/ao_scheme_test.c index ed10d3be..195b8b46 100644 --- a/src/scheme/test/ao_scheme_test.c +++ b/src/scheme/test/ao_scheme_test.c @@ -131,7 +131,9 @@ main (int argc, char **argv) usage(argv[0]); exit(0); case 'l': +#ifdef AO_SCHEME_FEATURE_POSIX ao_scheme_set_argv(&argv[argc]); +#endif run_file(optarg); break; default: @@ -139,7 +141,9 @@ main (int argc, char **argv) exit(1); } } +#ifdef AO_SCHEME_FEATURE_POSIX ao_scheme_set_argv(argv + optind); +#endif if (argv[optind]) { run_file(argv[optind]); } else {