mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 19:50:24 +02:00
Code Activity

Pass as32 to create-array rather than As32 in order to match the

Browse source 
current SLIB definition.
This commit is contained in:
Rob Browning 2006-01-14 05:32:41 +00:00
parent 00ccca6f2c
commit 55a8f728ab
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
test-suite/tests/slib.test
View file

@ -312,5 +312,5 @@
;; create-array isn't in old slib, but when it exists it should work ;; create-array isn't in old slib, but when it exists it should work
(if (defined? 'create-array) (if (defined? 'create-array)
(with-test-prefix "create-array" (with-test-prefix "create-array"
(pass-if "As32 create" (pass-if "as32 create"
(array? (create-array (As32 0) '(0 1))))))))) (array? (create-array (as32 0) '(0 1)))))))))