summaryrefslogtreecommitdiff
path: root/src/scheme/test/ao_scheme_test.c
diff options
context:
space:
mode:
authorKeith Packard <keithp@keithp.com>2018-01-07 23:04:22 -0800
committerKeith Packard <keithp@keithp.com>2018-01-07 23:04:22 -0800
commit283553f0f118cef1dbcfbf5e86a43575a610d27f (patch)
tree9a17095f56e0068e150ebf93c33649ba133c2813 /src/scheme/test/ao_scheme_test.c
parent48d164e3d4b2ef27fae20fae63b8014803a7b178 (diff)
altos/scheme: Split tests out from build sources
Run tests on both tiny and full scheme test programs. Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/scheme/test/ao_scheme_test.c')
-rw-r--r--src/scheme/test/ao_scheme_test.c4
1 files changed, 4 insertions, 0 deletions
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 {