From 43ce0f4c1b111d747e71afc688bdbf9b6c693044 Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Mon, 18 Mar 2024 18:03:41 -0400 Subject: Fix array:clear() --- compile.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compile.c b/compile.c index d55560ef..fe7b2f6d 100644 --- a/compile.c +++ b/compile.c @@ -1396,7 +1396,7 @@ CORD compile(env_t *env, ast_t *ast) return CORD_all("Array__sort(", self, ", ", compile_type_info(env, self_value_t), ")"); } else if (streq(call->name, "clear")) { CORD self = compile_to_pointer_depth(env, call->self, 1, false); - return CORD_all("Array__compact(", self, ")"); + return CORD_all("Array__clear(", self, ")"); } else if (streq(call->name, "slice")) { CORD self = compile_to_pointer_depth(env, call->self, 1, false); arg_t *arg_spec = new(arg_t, .name="first", .type=Type(IntType, .bits=64), .default_val=FakeAST(Int, .i=1, .bits=64), -- cgit v1.2.3