Re: master e224c94: * lisp/emacs-lisp/seq.el (seq-doseq): Tighten the code

[Glenn Morris]

Stefan Monnier wrote:

> branch: master
> commit e224c9465dfe7033b11c0aeb830298c101c9bdcc
> Author: Stefan Monnier <address@hidden>
> Commit: Stefan Monnier <address@hidden>
>
>     * lisp/emacs-lisp/seq.el (seq-doseq): Tighten the code

So tight it doesn't build. :(

>    (declare (indent 1) (debug ((symbolp form &optional form) body)))
>    (let ((is-list (make-symbol "is-list"))
>          (seq (make-symbol "seq"))
>          (index (make-symbol "index")))
>      `(let* ((,seq ,(cadr spec))
> -            (,is-list (listp ,seq))
> +            (,length (if (listp ,seq) nil (seq-length ,seq)))

Missing make-symbol for "length"?

>              (,index (if ,is-list ,seq 0)))

"is-list" no longer set but still referenced?