(sequence:make-sequence-like '(1 2 3) 3)
 ; => (NIL NIL NIL)
(sequence:make-sequence-like '(1 2 3) 4)
 ; => (NIL NIL NIL NIL)
(sequence:adjust-sequence '(1 2 3) 4)
 ; => (1 2 3 NIL)
 
(sequence:make-sequence-like #(1 2 3) 3)
 ; => #(0 0 0)
(sequence:make-sequence-like #(1 2 3) 4)
 ; => #(0 0 0 0)
(sequence:adjust-sequence #(1 2 3) 4)
 ; => #(1 2 3 0)
 
(sequence:make-sequence-like
 (make-array 3 :element-type 'double-float :initial-contents '(1d0 2d0 3d0))
 3)
 ; => #(0.0d0 0.0d0 0.0d0)
(sequence:make-sequence-like
 (make-array 3 :element-type 'double-float :initial-contents '(1d0 2d0 3d0))
 4)
 ; => #(0.0d0 0.0d0 0.0d0 0.0d0)
(sequence:adjust-sequence
 (make-array 3 :element-type 'double-float :initial-contents '(1d0 2d0 3d0))
 4)
 ; => #(1.0d0 2.0d0 3.0d0 0.0d0)

(sequence:make-sequence-like #(nil nil nil) 3)
 ; => #(0 0 0)