summaryrefslogtreecommitdiffstats
path: root/unwind.c
diff options
context:
space:
mode:
Diffstat (limited to 'unwind.c')
-rw-r--r--unwind.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/unwind.c b/unwind.c
index 3b4f674e..c76c4b0b 100644
--- a/unwind.c
+++ b/unwind.c
@@ -292,7 +292,7 @@ val uw_throw(val sym, val exception)
}
if (uw_exception_subtype_p(sym, query_error_s) ||
uw_exception_subtype_p(sym, file_error_s)) {
- if (!output_produced)
+ if (opt_print_bindings)
put_line(lit("false"), std_output);
exit(EXIT_FAILURE);
}