From 385eb733db88bb0463a8174bab92c33ab2ae090f Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Fri, 18 Mar 2016 01:29:01 -0400 Subject: [PATCH] Cut over to new math functions when applying prims --- runtime.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/runtime.c b/runtime.c index 407016b3..ac230c89 100644 --- a/runtime.c +++ b/runtime.c @@ -1949,18 +1949,18 @@ void _Cyc_91end_91thread_67(void *data, object cont, object args) { return_closcall1(data, cont, boolean_f); } void __87(void *data, object cont, object 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) { Cyc_check_num_args(data, "-", 1, 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) { 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) { Cyc_check_num_args(data, "/", 1, 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) { Cyc_check_num_args(data, "Cyc-cvar?", 1, args); return_closcall1(data, cont, Cyc_is_cvar(car(args))); }