Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-20 14:19:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix normal exit for plan9

Browse source
This commit is contained in:
Bakul Shah 2011-12-04 00:27:41 -08:00
parent c8c31076ce
commit 0e85ac611d
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
main.c
View file

@ -15,6 +15,7 @@
#ifdef PLAN9 #ifdef PLAN9
#define exit_failure() exits("ERROR") #define exit_failure() exits("ERROR")
#define exit exits
#else #else
#define exit_failure() exit(70) #define exit_failure() exit(70)
#endif #endif
@ -447,5 +448,5 @@ void run_main (int argc, char **argv) {
int main (int argc, char **argv) { int main (int argc, char **argv) {
sexp_scheme_init(); sexp_scheme_init();
run_main(argc, argv); run_main(argc, argv);
return 0; exit(0);
} }