1
0
Fork 0
forked from fun/fun
fun/src/vm_case_clear.c
2025-09-15 08:39:41 +02:00

11 lines
264 B
C

case OP_CLEAR: {
Value arr = pop_value(vm);
if (arr.type != VAL_ARRAY) {
fprintf(stderr, "Runtime type error: CLEAR expects array\n");
exit(1);
}
array_clear(&arr);
free_value(arr);
push_value(vm, make_int(0));
break;
}