diff --git a/ansi-tests/coerce.lsp b/ansi-tests/coerce.lsp
index 0fae1fc3c7024347aa8b2ece42346fa55f6b086e..9fb48f08af6140499990b181b5688be918ccc28a 100644
--- a/ansi-tests/coerce.lsp
+++ b/ansi-tests/coerce.lsp
@@ -180,6 +180,7 @@
   t)
 
 (deftest coerce.error.10
+  :notes (:result-type-element-type-by-subtype)
   (let* ((tp1 '(vector character))
 	 (tp2 `(vector t))
 	 (tp3 `(or ,tp1 ,tp2)))