summaryrefslogtreecommitdiff
path: root/ice-9/arrays.scm
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-06-30 19:26:21 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-06-30 19:26:21 +0000
commit197edeea976beda781ef9cd96a33cc24d3ac37ea (patch)
tree546e9b0960c49f49bab122271e28d16ac25b3bb9 /ice-9/arrays.scm
parent0147054b67356fc72211965b915884cb4cc3caf4 (diff)
downloadguile-197edeea976beda781ef9cd96a33cc24d3ac37ea.tar.gz
* Don't install a bitvector read-hash extension for letter 'b'.
Diffstat (limited to 'ice-9/arrays.scm')
-rw-r--r--ice-9/arrays.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/ice-9/arrays.scm b/ice-9/arrays.scm
index 7d249795e..b08de5e97 100644
--- a/ice-9/arrays.scm
+++ b/ice-9/arrays.scm
@@ -47,8 +47,8 @@
(for-each (lambda (char template)
(read-hash-extend char
(make-array-proc template)))
- '(#\b #\a #\u #\e #\s #\i #\c #\y #\h #\l)
- '(#t #\a 1 -1 1.0 1/3 0+i #\nul s l)))
+ '(#\a #\u #\e #\s #\i #\c #\y #\h #\l)
+ '(#\a 1 -1 1.0 1/3 0+i #\nul s l)))
(let ((array-proc (lambda (c port)
(read:array c port))))