mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-31 15:43:01 +00:00
Code Issues 1 Releases Wiki Activity

MSVC unwilling to concatenate strings across preprocessor directives.

Browse Source
This commit is contained in:
Calvin Rose
2022-02-09 22:36:07 -06:00
parent e64da8ede4
commit aba87bf1bd
1 changed files with 6 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
src/core/vm.c
View File

@@ -1340,16 +1340,15 @@ static JanetSignal janet_check_can_resume(JanetFiber *fiber, Janet *out, int is_
} }
/* If a "task" fiber is trying to be used as a normal fiber, detect that. See bug #920. */ /* If a "task" fiber is trying to be used as a normal fiber, detect that. See bug #920. */
if (janet_vm.stackn > 0 && (fiber->gc.flags & JANET_FIBER_FLAG_ROOT)) { if (janet_vm.stackn > 0 && (fiber->gc.flags & JANET_FIBER_FLAG_ROOT)) {
#ifdef JANET_EV
*out = janet_cstringv(is_cancel
? "cannot cancel root fiber, use ev/cancel"
: "cannot resume root fiber, use ev/go");
#else
*out = janet_cstringv(is_cancel *out = janet_cstringv(is_cancel
? "cannot cancel root fiber" ? "cannot cancel root fiber"
#ifdef JANET_EV : "cannot resume root fiber");
", use ev/cancel"
#endif #endif
: "cannot resume root fiber"
#ifdef JANET_EV
", use ev/go"
#endif
);
return JANET_SIGNAL_ERROR; return JANET_SIGNAL_ERROR;
} }
if (janet_vm.stackn == 0) { if (janet_vm.stackn == 0) {