Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-07 13:16:36 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge pull request #388 from ecraven/stderr

Browse source 
Display warning on stderr, not stdout.
This commit is contained in:
Alex Shinn 2017-01-10 00:34:41 +09:00 • committed by GitHub
commit 71b00779bc
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/chibi/repl.scm
View file

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