fix comm

argumentcomputer · Aug 18, 2023 · bb9f6dc · bb9f6dc
1 parent dae4c01
commit bb9f6dc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/lem/eval.rs b/src/lem/eval.rs
@@ -655,7 +655,7 @@ fn apply_cont() -> Func {
                             Symbol("comm") => {
                                 match result.tag {
                                     Expr::Num | Expr::Comm => {
-                                        let cast = cast(result, Expr::Num);
+                                        let cast = cast(result, Expr::Comm);
                                         return(cast, env, continuation, makethunk)
                                     }
                                 };