diff --git a/ansi-tests/string.lsp b/ansi-tests/string.lsp
index 06f69f3589577d827e3c83bf66ca8133d72f64ee..4e88671bacbd294682957f12f46e60111b8fd24d 100644
--- a/ansi-tests/string.lsp
+++ b/ansi-tests/string.lsp
@@ -89,6 +89,7 @@
   nil t)
 
 (deftest base-string.6
+  :notes (:nil-vectors-are-strings)
   (subtypep* 'string 'base-string)
   nil t)
 
@@ -123,14 +124,17 @@
   t t)
 
 (deftest simple-string.8
+  :notes (:nil-vectors-are-strings)
   (subtypep* 'simple-string '(simple-array character (*)))
   nil t)
 
 (deftest simple-string.9
+  :notes (:nil-vectors-are-strings)
   (subtypep* 'simple-string '(simple-array base-char (*)))
   nil t)
 
 (deftest simple-string.10
+  :notes (:nil-vectors-are-strings)
   (subtypep* 'simple-string 'simple-base-string)
   nil t)