aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBruce Hill <bruce@bruce-hill.com>2024-08-19 13:21:28 -0400
committerBruce Hill <bruce@bruce-hill.com>2024-08-19 13:21:28 -0400
commit3ddaf9250586db0cf0d3e40106c836bb7ec33add (patch)
treedb7643574cc7826f9b6d5d6b2134dd1363577fc4
parent178dca6e88810d48c441638028aa04a39899dd0b (diff)
Bugfix :text_content() for DSLs
-rw-r--r--typecheck.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/typecheck.c b/typecheck.c
index 2fb8556d..3d40da3c 100644
--- a/typecheck.c
+++ b/typecheck.c
@@ -362,7 +362,7 @@ void bind_statement(env_t *env, ast_t *statement)
new(binding_t, .type=Type(FunctionType, .args=new(arg_t, .name="text", .type=TEXT_TYPE), .ret=type),
.code=CORD_all("(", namespace_prefix(env->libname, env->namespace), def->name, "_t)")));
set_binding(ns_env, "text_content",
- new(binding_t, .type=Type(FunctionType, .args=new(arg_t, .name="text", .type=TEXT_TYPE), .ret=type),
+ new(binding_t, .type=Type(FunctionType, .args=new(arg_t, .name="text", .type=type), .ret=TEXT_TYPE),
.code="(Text_t)"));
for (ast_list_t *stmt = def->namespace ? Match(def->namespace, Block)->statements : NULL; stmt; stmt = stmt->next)