[Guile-commits] GNU Guile branch, master, updated. release_1-9-11-126-g8d10cca

[Andy Wingo]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=8d10ccae79ff46f0ebea92ba36acfaebafba8d86

The branch, master has been updated
       via  8d10ccae79ff46f0ebea92ba36acfaebafba8d86 (commit)
      from  1052739b74380978a080ee5604cb1a8d0648a4d6 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 8d10ccae79ff46f0ebea92ba36acfaebafba8d86
Author: Andy Wingo <address@hidden>
Date:   Mon Jun 21 00:07:46 2010 +0200

    fix rnrs duplicate bindings warnings
    
    * module/rnrs.scm: Fix i/o duplicate bindings warnings by excluding some
      bindings.

-----------------------------------------------------------------------

Summary of changes:
 module/rnrs.scm |   42 +++++++++++++++++++++++++++++++++++++++++-
 1 files changed, 41 insertions(+), 1 deletions(-)

diff --git a/module/rnrs.scm b/module/rnrs.scm
index 4ba9e2a..eb2ea85 100644
--- a/module/rnrs.scm
+++ b/module/rnrs.scm
@@ -236,7 +236,47 @@
          (rnrs control (6))
          (rnrs enums (6))
          (rnrs exceptions (6))
-         (rnrs files (6))
+
+          ;; These i/o conditions are exported by (io simple), (files), and
+          ;; should be exported by (ports) but are not yet. Avoid duplicate
+          ;; bindings warnings, then, by excluding these bindings from all but
+          ;; (io simple).
+         (except (rnrs files (6))
+                  &i/o make-i/o-error i/o-error?
+                  &i/o-read make-i/o-read-error i/o-read-error?
+                  &i/o-write make-i/o-write-error i/o-write-error?
+
+                  &i/o-invalid-position 
+                  make-i/o-invalid-position-error 
+                  i/o-invalid-position-error? 
+                  i/o-error-position
+         
+                  &i/o-filename
+                  make-i/o-filename-error
+                  i/o-filename-error?
+                  i/o-error-filename
+         
+                  &i/o-file-protection 
+                  make-i/o-file-protection-error
+                  i/o-file-protection-error?
+
+                  &i/o-file-is-read-only
+                  make-i/o-file-is-read-only-error
+                  i/o-file-is-read-only-error?
+
+                  &i/o-file-already-exists
+                  make-i/o-file-already-exists-error
+                  i/o-file-already-exists-error?
+
+                  &i/o-file-does-not-exist
+                  make-i/o-file-does-not-exist-error
+                  i/o-file-does-not-exist-error?
+
+                  &i/o-port
+                  make-i/o-port-error
+                  i/o-port-error?
+                  i/o-error-port)
+
          (rnrs hashtables (6))
 
          (rnrs io ports (6))


hooks/post-receive
-- 
GNU Guile