esolangs
/
u6a
1
0
Fork 0
Code Issues Pull Requests Projects Releases 3 Wiki Activity

fix bug in vm_stack

This commit is contained in:
CismonX 2020-06-03 16:07:29 +08:00
parent 7a82c7e3b2
commit 138f9978f8
No known key found for this signature in database
GPG Key ID: 315D6652268C5007
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/vm_stack.c
View File

@ -235,10 +235,10 @@ u6a_vm_stack_xch(struct u6a_vm_var_fn v0) {
return (struct u6a_vm_var_fn) { 0 }; return (struct u6a_vm_var_fn) { 0 };
} }
if (--prev->refcnt > 0) { if (--prev->refcnt > 0) {
prev = vm_stack_dup(active_stack); prev = vm_stack_dup(prev);
} if (UNLIKELY(prev == NULL)) {
if (UNLIKELY(active_stack == NULL)) { return (struct u6a_vm_var_fn) { 0 };
return (struct u6a_vm_var_fn) { 0 }; }
} }
if (vs->top == 0) { if (vs->top == 0) {
++prev->refcnt; ++prev->refcnt;