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

Allow Cyc_apply to receive 0 scheme args

Browse source
This commit is contained in:
Justin Ethier 2016-02-11 21:05:37 -05:00
parent d8171527b9
commit bf561a66e1
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
runtime.c
View file

@ -2128,7 +2128,10 @@ void Cyc_apply(void *data, int argc, closure cont, object prim, ...){
//printf("\n"); //printf("\n");
va_end(ap); va_end(ap);
apply(data, cont, prim, (object)&args[0]); apply(data, cont, prim,
(argc > 0)
? (object)&args[0]
: nil);
} }
// END apply // END apply