#471: LOOP destructures non-conformingly -------------------------------+----------------------- Reporter: Mark Evenson | Owner: (none) Type: defect | Status: new Priority: minor | Milestone: 1.7.2 Component: other | Version: 1.7.2-dev Resolution: | Keywords: ansi loop Parent Tickets: | -------------------------------+----------------------- Description changed by Mark Evenson:

Old description:

{{{ (loop with (a b) = '(1) do (return (list a b))) (loop for (a b) = '(1) do (return (list a b))) }}}

These forms should both return {{{ (1 nil) }}}

as per http://www.lispworks.com/documentation/HyperSpec/Body/06_aag.htm

Problem reported by Steve Losh.

c.f. https://gitlab.com/embeddable-common-lisp/ecl/-/issues/605

New description:

{{{ (loop with (a b) = '(1) do (return (list a b))) }}}

This forms should both return {{{ (1 nil) }}}

as per http://www.lispworks.com/documentation/HyperSpec/Body/06_aag.htm

Problem reported by Steve Losh.

c.f. https://gitlab.com/embeddable-common-lisp/ecl/-/issues/605

--

#471: LOOP destructures non-conformingly -------------------------------+----------------------- Reporter: Mark Evenson | Owner: (none) Type: defect | Status: closed Priority: minor | Milestone: 1.7.2 Component: other | Version: 1.7.2-dev Resolution: fixed | Keywords: ansi loop Parent Tickets: | -------------------------------+----------------------- Changes (by Mark Evenson):

* status: new => closed * resolution: => fixed

Comment:

Fixed with https://abcl.org/trac/changeset/15377