[armedbear] #471: LOOP destructures non-conformingly

#471: LOOP destructures non-conformingly -------------------------------+-------------------- Reporter: Mark Evenson | Type: defect Status: new | Priority: major Milestone: | Component: other Version: 1.7.1-dev | Keywords: Parent Tickets: | -------------------------------+-------------------- {{{ (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