summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJulian Graham <julian.graham@aya.yale.edu>2010-03-06 02:04:25 -0500
committerJulian Graham <julian.graham@aya.yale.edu>2010-05-20 21:18:02 -0400
commitaa439b3908b71f268f8a8d091d8143edebb5cde7 (patch)
treef174976da1e0e0bdb148dc9a9b6ab758fe564e10
parentbf745816f21d4d0d13889e97ae18a1171abda4a7 (diff)
downloadguile-aa439b3908b71f268f8a8d091d8143edebb5cde7.tar.gz
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.
-rw-r--r--module/Makefile.am1
-rw-r--r--module/rnrs/arithmetic/6/bitwise.scm4
-rw-r--r--test-suite/Makefile.am1
3 files changed, 5 insertions, 1 deletions
diff --git a/module/Makefile.am b/module/Makefile.am
index f5cde7d0f..5bfb82822 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 b21946645..bb3a20797 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 ca220d270..2fa796d11 100644
--- a/test-suite/Makefile.am
+++ b/test-suite/Makefile.am
@@ -76,6 +76,7 @@ SCM_TESTS = tests/00-initial-env.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/rnrs-libraries.test \