Another "can't tell the size" error, this time with a bad setf form

[Paul F. Dietz]

(lambda (l)
  (declare (fixnum l))
  (let ((words nil) (mark 0) (pos 0))
    (labels ((finish ()
               (setf pos l)
               (save))
             (save ()
               (when (< mark pos) (push (list mark pos) words)))
             (mark () (setf mark pos))
             (in-word (char) (save) #'in-space)
             (in-space () (mark) #'in-word)
             )
      (dotimes (i l (finish))
          (setf state) ;; bad assignment
          ))))

===>

can't tell the size of #<SB-C:TN '0!1 :CONSTANT>

[Stas Boukarev (stassats)]

Fixed once and for all in 18f2fb18c5da9ae5699d18f62a338abc93ddcbaa