Agora estou estudando Emacs Lisp damanual de referenci e Lisp comum de um LISP Livro

do livro Common Lisp

>> (setf power-of-two
     (let ((previous-power-of-two 1))
       #'(lambda ()
           (setf previous-power-of-two
             (* previous-power-of-two 2)))))

>> (funcall power-of-two)
2

>> (funcall power-of-two)
4

>> (funcall power-of-two)
8

A função não funcionará no Emacs Lisp devido ao seu comportamento dinâmico de ligaçã

Será que é possível implementar a mesma função no Emacs Lisp sem introduzir uma variável globa