Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-24 04:25:06 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Cut over to new math functions when applying prims

Browse source
This commit is contained in:
Justin Ethier 2016-03-18 01:29:01 -04:00
parent 32330ca971
commit 385eb733db
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
runtime.c
View file

@ -1949,18 +1949,18 @@ void _Cyc_91end_91thread_67(void *data, object cont, object args) {
return_closcall1(data, cont, boolean_f); } return_closcall1(data, cont, boolean_f); }
void __87(void *data, object cont, object args) { void __87(void *data, object cont, object args) {
integer_type argc = Cyc_length(data, args); integer_type argc = Cyc_length(data, args);
dispatch(data, argc.value, (function_type)dispatch_sum, cont, cont, args); } dispatch(data, argc.value, (function_type)dispatch_sum2, cont, cont, args); }
void __91(void *data, object cont, object args) { void __91(void *data, object cont, object args) {
Cyc_check_num_args(data, "-", 1, args); Cyc_check_num_args(data, "-", 1, args);
{ integer_type argc = Cyc_length(data, args); { integer_type argc = Cyc_length(data, args);
dispatch(data, argc.value, (function_type)dispatch_sub, cont, cont, args); }} dispatch(data, argc.value, (function_type)dispatch_sub2, cont, cont, args); }}
void __85(void *data, object cont, object args) { void __85(void *data, object cont, object args) {
integer_type argc = Cyc_length(data, args); integer_type argc = Cyc_length(data, args);
dispatch(data, argc.value, (function_type)dispatch_mul, cont, cont, args); } dispatch(data, argc.value, (function_type)dispatch_mul2, cont, cont, args); }
void __95(void *data, object cont, object args) { void __95(void *data, object cont, object args) {
Cyc_check_num_args(data, "/", 1, args); Cyc_check_num_args(data, "/", 1, args);
{ integer_type argc = Cyc_length(data, args); { integer_type argc = Cyc_length(data, args);
dispatch(data, argc.value, (function_type)dispatch_div, cont, cont, args); }} dispatch(data, argc.value, (function_type)dispatch_div2, cont, cont, args); }}
void _Cyc_91cvar_127(void *data, object cont, object args) { void _Cyc_91cvar_127(void *data, object cont, object args) {
Cyc_check_num_args(data, "Cyc-cvar?", 1, args); Cyc_check_num_args(data, "Cyc-cvar?", 1, args);
return_closcall1(data, cont, Cyc_is_cvar(car(args))); } return_closcall1(data, cont, Cyc_is_cvar(car(args))); }