Actually use the environment for binop functions.

2020-09-10 16:03:56 -07:00
parent 2a81fdd9fb
commit f00a6a7783
2 changed files with 4 additions and 1 deletions
--- a/code/compiler/13/main.cpp
+++ b/code/compiler/13/main.cpp
@@ -43,9 +43,11 @@ void prelude_types(definition_group& defs, type_env_ptr env) {
    constexpr binop cmp_ops[] = { EQUALS, LESS_EQUALS };
    for(auto& op : number_ops) {
        env->bind(op_name(op), binop_type, visibility::global);
+        env->set_mangled_name(op_name(op), op_action(op));
    }
    for(auto& op : cmp_ops) {
        env->bind(op_name(op), cmp_type, visibility::global);
+        env->set_mangled_name(op_name(op), op_action(op));
    }

    env->bind("True", bool_type_app, visibility::global);