mirror of
https://github.com/justinethier/cyclone.git
synced 2025-07-04 19:56:34 +02:00
Proof of concept for applying compiled proc
Need to generalize this to take an arbitrary number of arguments.
This commit is contained in:
parent
a80ad7d65b
commit
fd69effec1
1 changed files with 4 additions and 0 deletions
|
@ -1075,6 +1075,10 @@ static object apply(object cont, object func, object args){
|
||||||
exit(1);
|
exit(1);
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
|
case closure0_tag:
|
||||||
|
// TODO: get length of args, 2 below is just an example
|
||||||
|
return_funcall2((closure)func, cont, car(args));
|
||||||
|
break;
|
||||||
default:
|
default:
|
||||||
printf("Invalid object type %ld\n", type_of(func));
|
printf("Invalid object type %ld\n", type_of(func));
|
||||||
exit(1);
|
exit(1);
|
||||||
|
|
Loading…
Add table
Reference in a new issue