Dump deferred warnings when eval exception thrown.

* eval.c (eval-exception): Call uw_dump_deferred_warnings
before throwing exception. The warnings could provide valuable
clues about the cause of the error.

* share/txr/stdlib/error.tl (compile-error): Likewise.

1 files changed, 2 insertions, 0 deletions

diff --git a/eval.c b/eval.c
index 87266f17..1c5855ae 100644
--- a/eval.c
+++ b/eval.c
@@ -225,6 +225,8 @@ noreturn static void eval_exception(val sym, val ctx, val fmt, va_list vl)
 
   (void) vformat(stream, fmt, vl);
 
+  uw_dump_deferred_warnings(std_error);
+
   uw_throw(sym, get_string_from_stream(stream));
 }