From 3cd3b20f58e9d2c6463d503be09e5d4cfaadee6c Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Sun, 12 Oct 2025 14:05:22 -0400
Subject: Code cleanup and fixing minor issues

---
 src/compile/declarations.c | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

(limited to 'src/compile/declarations.c')

diff --git a/src/compile/declarations.c b/src/compile/declarations.c
index f1c59f73..3b80bade 100644
--- a/src/compile/declarations.c
+++ b/src/compile/declarations.c
@@ -36,10 +36,7 @@ Text_t compile_declared_value(env_t *env, ast_t *declare_ast) {
 
     if (decl->value) {
         Text_t val_code = compile_maybe_incref(env, decl->value, t);
-        if (t->tag == FunctionType) {
-            assert(promote(env, decl->value, &val_code, t, Type(ClosureType, t)));
-            t = Type(ClosureType, t);
-        }
+        if (t->tag == FunctionType) assert(promote(env, decl->value, &val_code, t, Type(ClosureType, t)));
         return val_code;
     } else {
         Text_t val_code = compile_empty(t);
-- 
cgit v1.2.3