diff --git a/ansi-tests/with-output-to-string.lsp b/ansi-tests/with-output-to-string.lsp index e7bdf59c59303afdf5b7ed989493af78631c38e4..c7c59ef533c16dd8e51d1c141b4c532f7034707c 100644 --- a/ansi-tests/with-output-to-string.lsp +++ b/ansi-tests/with-output-to-string.lsp @@ -20,7 +20,7 @@ nil) (deftest with-output-to-string.4 - :notes (:allow-nil-arrays) + :notes (:allow-nil-arrays :nil-vectors-are-strings) (let ((str (make-array 10 :fill-pointer 0 :element-type 'character))) (values (with-output-to-string @@ -53,7 +53,7 @@ "8") (deftest with-output-to-string.9 - :notes (:allow-nil-arrays) + :notes (:allow-nil-arrays :nil-vectors-are-strings) (with-output-to-string (s nil :element-type nil)) "")