| 23 | |
| 24 | |
| 25 | void hc_vm_init(struct hc_vm *vm, struct hc_malloc *malloc) { |
| 26 | hc_vector_init(&vm->stack, malloc, sizeof(struct hc_value)); |
| 27 | hc_vector_init(&vm->ops, malloc, sizeof(const struct hc_op *)); |
| 28 | hc_vector_init(&vm->code, malloc, sizeof(hc_op_eval_t)); |
| 29 | } |
| 30 | |
| 31 | static size_t op_items(const struct hc_op *op, |
| 32 | uint8_t *p, |