From eb2a9027b0eb0ebb8e94e9ce3ed8571881bfdac6 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Mon, 17 Jun 2024 17:23:39 -0400
Subject: Fix issue with 'when' statements

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

diff --git a/compile.c b/compile.c
index 83d99804..1a7f4002 100644
--- a/compile.c
+++ b/compile.c
@@ -220,7 +220,7 @@ CORD compile_statement(env_t *env, ast_t *ast)
                              "switch (subject.$tag) {");
         for (when_clause_t *clause = when->clauses; clause; clause = clause->next) {
             const char *clause_tag_name = Match(clause->tag_name, Var)->name;
-            code = CORD_all(code, "case ", namespace_prefix(enum_t->env->libname, enum_t->env->namespace), enum_t->name, "$tag$", clause_tag_name, ": {\n");
+            code = CORD_all(code, "case ", namespace_prefix(enum_t->env->libname, enum_t->env->namespace), "tag$", clause_tag_name, ": {\n");
             type_t *tag_type = NULL;
             for (tag_t *tag = enum_t->tags; tag; tag = tag->next) {
                 if (streq(tag->name, clause_tag_name)) {
-- 
cgit v1.2.3