diff --git a/ansi-tests/adjust-array.lsp b/ansi-tests/adjust-array.lsp index f1912ace1ac23c6f76b5b62e97c0992e21109b8f..efb7c9619b8b24aea366f07d4477b5cc525cb0cf 100644 --- a/ansi-tests/adjust-array.lsp +++ b/ansi-tests/adjust-array.lsp @@ -793,7 +793,7 @@ (8 :initial-contents '(0 1 0 1 1 0 1 0) :element-type 'bit) #*01011010) -(def-adjust-array-fp-test adjust-array.bit-vectoradjustable.5 +(def-adjust-array-fp-test adjust-array.bit-vector.adjustable.5 (5 :initial-contents '(1 1 1 0 0) :fill-pointer 3 :adjustable t :element-type 'bit) (4 :element-type 'bit :initial-element 0) (assert (eq (aref a2 3) 0))