From bb1af5c7b5e76ddd3e76ff75e62c0f0a65026ded Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Sun, 24 Aug 2025 19:52:41 -0400
Subject: Refactoring bug fix

---
 src/compile/expressions.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/compile/expressions.c b/src/compile/expressions.c
index 4d41af61..2320474a 100644
--- a/src/compile/expressions.c
+++ b/src/compile/expressions.c
@@ -230,7 +230,7 @@ Text_t compile(env_t *env, ast_t *ast) {
     case ExplicitlyTyped: {
         return compile_to_type(env, Match(ast, ExplicitlyTyped)->ast, get_type(env, ast));
     }
-    case When: return compile_when_statement(env, ast);
+    case When: return compile_when_expression(env, ast);
     case If: return compile_if_expression(env, ast);
     case Reduction: return compile_reduction(env, ast);
     case FieldAccess: return compile_field_access(env, ast);
-- 
cgit v1.2.3