From 57c6d7c1ec091b6013d09f897e432fbb79b92e39 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Sun, 10 Jul 2016 08:30:30 +0900 Subject: [PATCH] don't try printing a potentially corrupt stack after OOS (issue #371) --- main.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/main.c b/main.c index ceed2166..9a34e370 100644 --- a/main.c +++ b/main.c @@ -154,7 +154,8 @@ static void repl (sexp ctx, sexp env) { #endif if (res && sexp_exceptionp(res)) { sexp_print_exception(ctx, res, err); - sexp_stack_trace(ctx, err); + if (res != sexp_global(ctx, SEXP_G_OOS_ERROR)) + sexp_stack_trace(ctx, err); } else if (res != SEXP_VOID) { sexp_write(ctx, res, out); sexp_write_char(ctx, '\n', out);