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

Threaded supervisors return fiber->last_value instead

Browse Source 
of the fiber itself.
This commit is contained in:
Calvin Rose 2021-08-31 14:50:27 -05:00
parent 1613e2593c
commit ef23356309
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/core/ev.c
View File

@ -513,7 +513,7 @@ static int janet_channel_pop(JanetChannel *channel, Janet *item, int is_choice);
static Janet make_supervisor_event(const char *name, JanetFiber *fiber, int threaded) { static Janet make_supervisor_event(const char *name, JanetFiber *fiber, int threaded) {
Janet tup[2]; Janet tup[2];
tup[0] = janet_ckeywordv(name); tup[0] = janet_ckeywordv(name);
tup[1] = threaded ? janet_ckeywordv("thread-fiber") : janet_wrap_fiber(fiber) ; tup[1] = threaded ? fiber->last_value : janet_wrap_fiber(fiber) ;
return janet_wrap_tuple(janet_tuple_n(tup, 2)); return janet_wrap_tuple(janet_tuple_n(tup, 2));
} }