diff --git a/src/lsp/defstruct.lsp b/src/lsp/defstruct.lsp
index f4724d41f..281c8bad2 100644
--- a/src/lsp/defstruct.lsp
+++ b/src/lsp/defstruct.lsp
@@ -312,8 +312,6 @@
   #+clos
   (when *keep-documentation*
     (set-documentation name 'STRUCTURE documentation))
-  (and (consp type) (eq (car type) 'VECTOR)
-       (setq type 'VECTOR))
   (dolist (x slot-descriptions)
     (and x
 	 (not (eql (car x) 'TYPED-STRUCTURE-NAME))