mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 21:40:33 +02:00
Code Activity

Fix missing imports for `(rnrs arithmetic bitwise)'.

Browse source 
* 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.
This commit is contained in:
Julian Graham 2010-03-06 02:04:25 -05:00
parent bf745816f2
commit aa439b3908
3 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
module/Makefile.am
View file

@ -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

4
module/rnrs/arithmetic/6/bitwise.scm
View file

@ -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)

1
test-suite/Makefile.am
View file

@ -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 \