Subject: Re: bug#76132: Clojure-style auto-gensyms for macros

From: Stefan Monnier <[email-masked]>
Date: Wed, 12 Feb 2025 09:02:14 -0500

> does not return any uninterned symbols.  It returns the code which *when
> executed* will generate a new uninterned symbol.  Try
>
>     (equal (eval (macroexpand '(cl-with-gensyms (x)
>                                  `(+ ,x ,x))))
>            (eval (macroexpand '(cl-with-gensyms (x)
>                                  `(+ ,x ,x)))))

Actually a more precise test would be:

    (let ((codegen (macroexpand-all '(cl-with-gensyms (x)
                                       `(+ ,x ,x)))))
      (equal (eval codegen t) (eval codegen t)))

- Stefan