aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--compile.c6
-rw-r--r--typecheck.c3
2 files changed, 6 insertions, 3 deletions
diff --git a/compile.c b/compile.c
index 5d1485cc..26266607 100644
--- a/compile.c
+++ b/compile.c
@@ -715,6 +715,12 @@ CORD compile(env_t *env, ast_t *ast)
.next=new(arg_t, .name="at", .type=Type(IntType, .bits=64), .default_val=FakeAST(Int, .i=0, .bits=64)));
return CORD_all("Array__insert(", self, ", ", compile_arguments(env, ast, arg_spec, call->args), ", ",
compile_type_info(env, self_value_t), ")");
+ } else if (streq(call->name, "insert_all")) {
+ CORD self = compile_to_pointer_depth(env, call->self, 1, false);
+ arg_t *arg_spec = new(arg_t, .name="items", .type=self_value_t,
+ .next=new(arg_t, .name="at", .type=Type(IntType, .bits=64), .default_val=FakeAST(Int, .i=0, .bits=64)));
+ return CORD_all("Array__insert_all(", self, ", ", compile_arguments(env, ast, arg_spec, call->args), ", ",
+ compile_type_info(env, self_value_t), ")");
} else if (streq(call->name, "remove")) {
CORD self = compile_to_pointer_depth(env, call->self, 1, false);
arg_t *arg_spec = new(arg_t, .name="index", .type=Type(IntType, .bits=64), .default_val=FakeAST(Int, .i=-1, .bits=64),
diff --git a/typecheck.c b/typecheck.c
index 47fe8c64..59befcdb 100644
--- a/typecheck.c
+++ b/typecheck.c
@@ -414,10 +414,7 @@ type_t *get_type(env_t *env, ast_t *ast)
else if (streq(call->name, "random"))
return Type(PointerType, .pointed=Match(self_value_t, ArrayType)->item_type, .is_optional=true, .is_readonly=true);
else if (streq(call->name, "clear")) return Type(VoidType);
- else if (streq(call->name, "compact")) return Type(VoidType);
- else if (streq(call->name, "contains")) return Type(VoidType);
else if (streq(call->name, "slice")) return self_value_t;
- else if (streq(call->name, "concat")) return self_value_t;
else code_err(ast, "There is no '%s' method for arrays", call->name);
}
case TableType: {