[Guile-commits] GNU Guile branch, wip-r6rs-libraries, updated. release_1-9-8-72-gd05c4f3

[Julian Graham]

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=d05c4f37c07fb9ea54eb12760c147884f6ea8aac

The branch, wip-r6rs-libraries has been updated
       via  d05c4f37c07fb9ea54eb12760c147884f6ea8aac (commit)
      from  b7845f6b06ca3cfe0f4ed1ad7ca5af41159eed01 (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 d05c4f37c07fb9ea54eb12760c147884f6ea8aac
Author: Julian Graham <address@hidden>
Date:   Sat Mar 6 02:04:25 2010 -0500

    Fix missing imports for `(rnrs arithmetic bitwise)'.
    
    * module/Makefile.am: Add module/rnrs/arithmetic/6/bitwise.scm to
      RNRS_SOURCES.
    * module/rnrs/arithmetic/6/bitwise.scm: Import `(rnrs control)' and `modulo'
      from `(guile)'.
    * test-suite/Makefile.am: Add r6rs-arithmetic-bitwise.test to SCM_TESTS.

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

Summary of changes:
 module/Makefile.am                   |    1 +
 module/rnrs/arithmetic/6/bitwise.scm |    4 +++-
 test-suite/Makefile.am               |    1 +
 3 files changed, 5 insertions(+), 1 deletions(-)

diff --git a/module/Makefile.am b/module/Makefile.am
index df498e4..2563375 100644
--- a/module/Makefile.am
+++ b/module/Makefile.am
@@ -258,6 +258,7 @@ SRFI_SOURCES = \
 RNRS_SOURCES =                                 \
   rnrs/6/base.scm                              \
   rnrs/6/control.scm                           \
+  rnrs/arithmetic/6/bitwise.scm                        \
   rnrs/bytevector.scm                          \
   rnrs/io/ports.scm
 
diff --git a/module/rnrs/arithmetic/6/bitwise.scm 
b/module/rnrs/arithmetic/6/bitwise.scm
index b219466..bb3a207 100644
--- a/module/rnrs/arithmetic/6/bitwise.scm
+++ b/module/rnrs/arithmetic/6/bitwise.scm
@@ -40,12 +40,14 @@
          bitwise-rotate-bit-field
          bitwise-reverse-bit-field)
   (import (rnrs base (6))
+         (rnrs control (6))
          (rename (only (guile) lognot 
                                logand 
                                logior
                                logxor 
                                logcount 
-                               logbit? 
+                               logbit?
+                               modulo
                                ash)
                  (lognot bitwise-not)
                  (logand bitwise-and) 
diff --git a/test-suite/Makefile.am b/test-suite/Makefile.am
index fc14f3b..61658c4 100644
--- a/test-suite/Makefile.am
+++ b/test-suite/Makefile.am
@@ -70,6 +70,7 @@ SCM_TESTS = tests/alist.test                  \
            tests/q.test                        \
            tests/r4rs.test                     \
            tests/r5rs_pitfall.test             \
+           tests/r6rs-arithmetic-bitwise.test  \
            tests/r6rs-control.test             \
            tests/r6rs-ports.test               \
            tests/ramap.test                    \


hooks/post-receive
-- 
GNU Guile