mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-12-26 08:20:27 +00:00
Code Issues 1 Releases Wiki Activity

Can only enter pending threads.

Browse Source
This commit is contained in:
bakpakin 2017-07-03 16:15:16 -04:00
parent 70efcc336b
commit eeeb660120
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
core/vm.c
View File

@ -363,9 +363,8 @@ int gst_continue(Gst *vm) {
temp = gst_wrap_thread(vm->thread->parent); temp = gst_wrap_thread(vm->thread->parent);
} }
if (temp.type == GST_THREAD) { if (temp.type == GST_THREAD) {
if (temp.data.thread->status == GST_THREAD_DEAD || if (temp.data.thread->status != GST_THREAD_PENDING)
temp.data.thread->status == GST_THREAD_ERROR) gst_error(vm, "can only enter pending thread");
gst_error(vm, "cannot enter dead thread");
} }
gst_frame_ret(stack) = pc[1]; gst_frame_ret(stack) = pc[1];
vm->thread->status = GST_THREAD_PENDING; vm->thread->status = GST_THREAD_PENDING;

3
gsttests/basic.gst
View File

@ -104,4 +104,5 @@
# report # report
(print num-tests-passed " of " num-tests-run " tests passed") (print "\n" num-tests-passed " of " num-tests-run " tests passed\n")
(if (not (= num-tests-passed num-tests-run)) (exit! 1))