Experiments/libabacus
1
0
Fork 0
Code Issues 4 Pull Requests Releases Wiki Activity

Make operators simply aliases to functions.

Browse Source
This commit is contained in:
Danila Fedorin
2018-06-01 15:24:55 -07:00
parent 6cc43449c5
commit 5fec3bd63c
6 changed files with 50 additions and 102 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/interactive.c
View File

@@ -75,14 +75,14 @@ libab_result register_functions(libab* ab) {
TRY(libab_register_function(ab, "atan", &trig_type, function_atan));
TRY(libab_register_function(ab, "atan2", &atan2_type, function_atan2));
TRY(libab_register_operator_infix(ab, "+", 0, -1, &atan2_type,
function_operator));
TRY(libab_register_operator_infix(ab, "-", 0, -1, &atan2_type,
function_operator));
TRY(libab_register_operator_infix(ab, "*", 1, -1, &atan2_type,
function_operator));
TRY(libab_register_operator_infix(ab, "/", 1, -1, &atan2_type,
function_operator));
TRY(libab_register_function(ab, "plus", &atan2_type, function_operator));
TRY(libab_register_function(ab, "minus", &atan2_type, function_operator));
TRY(libab_register_function(ab, "times", &atan2_type, function_operator));
TRY(libab_register_function(ab, "divide", &atan2_type, function_operator));
TRY(libab_register_operator_infix(ab, "+", 0, -1, "plus"));
TRY(libab_register_operator_infix(ab, "-", 0, -1, "minus"));
TRY(libab_register_operator_infix(ab, "*", 1, -1, "times"));
TRY(libab_register_operator_infix(ab, "/", 1, -1, "divide"));
libab_ref_free(&trig_type);
libab_ref_free(&atan2_type);