~ chicken-core (chicken-5) d4b3d5ad2057160c9969a642ce509dad39407569

commit d4b3d5ad2057160c9969a642ce509dad39407569
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Nov 4 21:22:20 2016 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri Nov 4 21:22:20 2016 +0100

    chicken-install: flush stdout before dbg output

diff --git a/chicken-install.scm b/chicken-install.scm
index 4bf52889..c53e7b05 100644
--- a/chicken-install.scm
+++ b/chicken-install.scm
@@ -151,6 +151,7 @@
         (fstr (if (string? flag) flag (car args)))
         (args (if (string? flag) args (cdr args))))
     (when (or flag (not quiet))
+      (flush-output)
       (let ((port (current-error-port)))
         (apply fprintf port fstr args)
         (flush-output port) ) )))