diff options
Diffstat (limited to 'src/runtime/runtime.c')
| -rw-r--r-- | src/runtime/runtime.c | 17 |
1 files changed, 15 insertions, 2 deletions
diff --git a/src/runtime/runtime.c b/src/runtime/runtime.c index 2cbebda219..5fde296700 100644 --- a/src/runtime/runtime.c +++ b/src/runtime/runtime.c @@ -6,6 +6,17 @@ int32 panicking = 0; +int32 +gotraceback(void) +{ + byte *p; + + p = getenv("GOTRACEBACK"); + if(p == nil || p[0] == '\0') + return 1; // default is on + return atoi(p); +} + void sys·panicl(int32 lno) { @@ -17,8 +28,10 @@ sys·panicl(int32 lno) sys·printpc(&lno); prints("\n"); sp = (uint8*)&lno; - traceback(sys·getcallerpc(&lno), sp, g); - tracebackothers(g); + if(gotraceback()){ + traceback(sys·getcallerpc(&lno), sp, g); + tracebackothers(g); + } panicking = 1; sys·breakpoint(); // so we can grab it in a debugger sys·exit(2); |