(if (fboundp 'lisp::make-sequence-of-type)
(defun make-sequence-of-type (type len)
(lisp::make-sequence-of-type type len))
(defun make-sequence-of-type (type len)
(system::make-sequence-of-type type len)))
(if (fboundp 'lisp::make-sequence-of-type)
(defun make-sequence-of-type (type len)
(lisp::make-sequence-of-type type len))
(defun make-sequence-of-type (type len)
(system::make-sequence-of-type type len)))