ref: b5297d6a3721155431e61a592d03e1608f60096f
parent: 25e0e249b71284c01d15395f49d3675f1b59eb2e
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Mon Dec 23 16:08:10 EST 2024
fl_raise: flush stdout and stderr
--- a/flisp.c
+++ b/flisp.c
@@ -94,6 +94,9 @@
_Noreturn void
fl_raise(value_t e)
{
+ ios_flush(ios_stdout);
+ ios_flush(ios_stderr);
+
FL(lasterror) = e;
// unwind read state
while(FL(readstate) != FL(exctx)->rdst){