projects
/
fw
/
altos
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
altos/scheme: Split tests out from build sources
[fw/altos]
/
src
/
scheme
/
test
/
ao_scheme_test.c
diff --git
a/src/scheme/test/ao_scheme_test.c
b/src/scheme/test/ao_scheme_test.c
index ed10d3beba1de5d1e3ea2f247cf313cb56873ff8..195b8b469c672bd79ec1c39f1b29067fc3d75396 100644
(file)
--- 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':
usage(argv[0]);
exit(0);
case 'l':
+#ifdef AO_SCHEME_FEATURE_POSIX
ao_scheme_set_argv(&argv[argc]);
ao_scheme_set_argv(&argv[argc]);
+#endif
run_file(optarg);
break;
default:
run_file(optarg);
break;
default:
@@
-139,7
+141,9
@@
main (int argc, char **argv)
exit(1);
}
}
exit(1);
}
}
+#ifdef AO_SCHEME_FEATURE_POSIX
ao_scheme_set_argv(argv + optind);
ao_scheme_set_argv(argv + optind);
+#endif
if (argv[optind]) {
run_file(argv[optind]);
} else {
if (argv[optind]) {
run_file(argv[optind]);
} else {