Re: EVAL's use of WITH-STACK-LIST

[Eric Swenson]

> On Nov 8, 2024, at 10:47, Alfred M. Szmidt <ams@gnu.org> wrote:
> 
>    << While compiling LETF >>
>    (TEM (QUOTE LOCF) (CAAR VARS-LEFT)) appears in a list of variables to be 
> bound.
>   The variable TEM is used free; assumed special
> 
>   This seems like incorrect syntax — I believe the code should read:
> 
>   (when vars-left
>     (%push (with-stack-list (tem 'locf (caar vars-left))
>      (eval1 tem)))
> 
>   Other uses of WITH-STACK-LIST in the system use this syntax.  I
>   wonder if someone translated a LET to WITH-STACK-LIST and forgot to
>   remove the extra level of parentheses.
> 
>   Thoughts?
> 
> Good catch, I think.  Though I'm very .. squirmish at changing it
> (since the old garbage works).
> 
> Have you tried to compare older versions of calls to WITH-STACK-LIST?
> Did WITH-STACK-LIST syntax change?

Will do. And I’ll test a fix too.