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