From ccc4b87bc9030d70fcf3444ed27a39be5029ca15 Mon Sep 17 00:00:00 2001
From: Peter <craven@gmx.net>
Date: Mon, 9 Jan 2017 08:27:14 +0100
Subject: [PATCH] Display warning on stderr, not stdout.

Right now, a part of the warning (undefined variable: foo, is exported by: ..)
is displayed to stdout. This patch makes the entire message show up on stderr,
not split up between the two output streams.
---
 lib/chibi/repl.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/chibi/repl.scm b/lib/chibi/repl.scm
index 79bcc654..ed883db9 100644
--- a/lib/chibi/repl.scm
+++ b/lib/chibi/repl.scm
@@ -295,7 +295,7 @@
           (cond
            ((pair? mods)
             (display name out)
-            (display " is exported by:\n")
+            (display " is exported by:\n" out)
             (for-each
              (lambda (m)
                (display "  " out) (write m out) (newline out))
@@ -303,7 +303,7 @@
                    (lambda (a b)
                      (string<? (write-to-string a) (write-to-string b))))))
            (else
-            (display "... none found.\n"))))))))))
+            (display "... none found.\n" out))))))))))
 
 (define (repl/eval rp expr-list)
   (let ((out (repl-out rp)))