From 7a82c7e3b21bc1e3f01fd426afd3c725d026d9c2 Mon Sep 17 00:00:00 2001 From: CismonX Date: Mon, 1 Jun 2020 18:08:37 +0800 Subject: [PATCH] fix bug in runtime --- src/runtime.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/runtime.c b/src/runtime.c index 9f068c4..2309ed5 100644 --- a/src/runtime.c +++ b/src/runtime.c @@ -300,8 +300,9 @@ u6a_runtime_execute(FILE* restrict istream, FILE* restrict ostream) { ACC_FN(arg); break; case u6a_vf_d1_c: - func = u6a_vm_pool_get1(func.ref).fn; - goto do_apply; + STACK_PUSH2(VM_VAR_JMP, vm_var_fn_addref(u6a_vm_pool_get1(func.ref).fn)); + ACC_FN(arg); + VM_JMP(0x03); case u6a_vf_d1_s: tuple = u6a_vm_pool_get2(func.ref); STACK_PUSH1(tuple.v1.fn);