ref: 0275c42a8bd3b7786ed3d3619d6e5f99f98588e2
parent: cd45ba37d4468b4db71606ecd349bf309bdea804
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){