From 1a1fb6430831d962583c2b144067242814e032e6 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 1 Sep 2007 17:11:00 +0000 Subject: [PATCH] Changes from arch/CVS synchronization --- ChangeLog | 4 ++++ NEWS | 1 + ice-9/ChangeLog | 5 +++++ ice-9/boot-9.scm | 4 ++-- 4 files changed, 12 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 794f77561..a39ab8e65 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2007-09-01 Ludovic Courtès + + * NEWS: Mention duplicate binding warnings to stderr. + 2007-08-23 Ludovic Courtès * NEWS: Mention Solaris bug fixes. diff --git a/NEWS b/NEWS index b6e030e25..ce2b787be 100644 --- a/NEWS +++ b/NEWS @@ -15,6 +15,7 @@ Changes in 1.8.3 (since 1.8.2) * Bugs fixed ** Expressions like "(set! 'x #t)" no longer yield a crash +** Warnings about duplicate bindings now go to stderr ** Build problems on Solaris fixed * Implementation improvements diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog index 221158537..e839a03d0 100644 --- a/ice-9/ChangeLog +++ b/ice-9/ChangeLog @@ -1,3 +1,8 @@ +2007-09-01 Andy Wingo + + * boot-9.scm (duplicate-handlers)[warn, warn-override-core]: + Send warnings to `stderr' instead of `stdout'. + 2007-08-08 Ludovic Courtès * boot-9.scm (%record-type-check): Renamed to diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm index b3296b4cc..d1e6306c3 100644 --- a/ice-9/boot-9.scm +++ b/ice-9/boot-9.scm @@ -3055,7 +3055,7 @@ #f)) (define (warn module name int1 val1 int2 val2 var val) - (format #t + (format (current-error-port) "WARNING: ~A: `~A' imported from both ~A and ~A\n" (module-name module) name @@ -3077,7 +3077,7 @@ (define (warn-override-core module name int1 val1 int2 val2 var val) (and (eq? int1 the-scm-module) (begin - (format #t + (format (current-error-port) "WARNING: ~A: imported module ~A overrides core binding `~A'\n" (module-name module) (module-name int2)