From 55a8f728ab8d0c67cbf10846d6c06a6201194266 Mon Sep 17 00:00:00 2001 From: Rob Browning Date: Sat, 14 Jan 2006 05:32:41 +0000 Subject: [PATCH] Pass as32 to create-array rather than As32 in order to match the current SLIB definition. --- test-suite/tests/slib.test | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test-suite/tests/slib.test b/test-suite/tests/slib.test index 597d5c632..fa5dc237f 100644 --- a/test-suite/tests/slib.test +++ b/test-suite/tests/slib.test @@ -312,5 +312,5 @@ ;; create-array isn't in old slib, but when it exists it should work (if (defined? 'create-array) (with-test-prefix "create-array" - (pass-if "As32 create" - (array? (create-array (As32 0) '(0 1))))))))) + (pass-if "as32 create" + (array? (create-array (as32 0) '(0 1)))))))))