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

Remove annoying (fiber) text from stacktrace.

Browse Source
This commit is contained in:
Calvin Rose
2019-01-14 12:08:13 -05:00
parent 192705113e
commit e53778d5d8
2 changed files with 2 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/core/core.janet
View File

@@ -1475,7 +1475,6 @@ value, one key will be ignored."
(when f (when f
(loop (loop
[nf :in (reverse (debug/lineage f)) [nf :in (reverse (debug/lineage f))
:before (file/write stderr " (fiber)\n")
{:function func {:function func
:tail tail :tail tail
:pc pc :pc pc

1
src/core/run.c
View File

@@ -39,7 +39,6 @@ void janet_stacktrace(JanetFiber *fiber, const char *errtype, Janet err) {
for (fi = janet_v_count(fibers) - 1; fi >= 0; fi--) { for (fi = janet_v_count(fibers) - 1; fi >= 0; fi--) {
fiber = fibers[fi]; fiber = fibers[fi];
int32_t i = fiber->frame; int32_t i = fiber->frame;
if (i > 0) fprintf(stderr, " (fiber)\n");
while (i > 0) { while (i > 0) {
JanetStackFrame *frame = (JanetStackFrame *)(fiber->data + i - JANET_FRAME_SIZE); JanetStackFrame *frame = (JanetStackFrame *)(fiber->data + i - JANET_FRAME_SIZE);
JanetFuncDef *def = NULL; JanetFuncDef *def = NULL;