          (max-width (lusty-max-window-width))
          (upper-bound most-positive-fixnum)
          (n-items (length items))
-         ; STEVE use pre-allocated array?
          (lengths-v (make-vector n-items 0))
          (separator-length (length lusty-column-separator)))
 

    (lusty--print-no-entries)
    (return-from lusty--display-entries))

  (multiple-value-bind (n-rows n-columns column-widths lengths-v)
      (lusty--compute-optimal-layout entries)

    (let* ((n-entries (min (* n-rows n-columns)

        (loop for row across rows
              do
          (apply 'insert (nreverse row))
          (insert "\n"))))

    (when truncated-p
      (lusty--print-truncated))))


(defun lusty--print-no-entries ()
