Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-16 17:27:33 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Allow (exit) to take no args

Browse source
This commit is contained in:
Justin Ethier 2015-03-20 11:14:26 -04:00
parent 8c8b7bff74
commit 41c458c23f
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
runtime.h
View file

@ -1220,6 +1220,8 @@ static void _Cyc_91set_91cvar_67(object cont, object args) {
printf("not implemented\n"); exit(1); } printf("not implemented\n"); exit(1); }
/* Note we cannot use _exit (per convention) because it is reserved by C */ /* Note we cannot use _exit (per convention) because it is reserved by C */
static void _cyc_exit(object cont, object args) { static void _cyc_exit(object cont, object args) {
if(nullp(args))
__halt(nil);
__halt(car(args)); __halt(car(args));
} }
static void __75halt(object cont, object args) { static void __75halt(object cont, object args) {