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

11 lines
310 B
C

case OP_GTE: {
Value b = pop_value(vm);
Value a = pop_value(vm);
if (a.type != VAL_INT || b.type != VAL_INT) {
fprintf(stderr, "Runtime type error: GTE expects ints\n");
exit(1);
}
push_value(vm, make_int(a.i >= b.i ? 1 : 0));
free_value(a); free_value(b);
break;
}