mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-17 00:37:39 +00:00
Code Issues 1 Releases Wiki Activity

Expose current fiber via janet_current_fiber().

Browse Source
This commit is contained in:
Calvin Rose
2019-05-04 19:07:04 -04:00
parent 5a28d8d1fa
commit ff720f1320
2 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/core/fiber.c
View File

@@ -296,6 +296,10 @@ JanetFiberStatus janet_fiber_status(JanetFiber *f) {
return ((f)->flags & JANET_FIBER_STATUS_MASK) >> JANET_FIBER_STATUS_OFFSET;
}
JanetFiber *janet_current_fiber(void) {
return janet_vm_fiber;
}
/* CFuns */
static Janet cfun_fiber_getenv(int32_t argc, Janet *argv) {