"Edebug: names-edebug-anon0", etc., messages

[greg-minshall]

hi. i get this line, and also "...-anon1", printed on stderr with the following (not necessarily exemplary) script:

#!/usr/bin/emacs --script
;; path to names
(let ((default-directory "~/.emacs.d/straight/build/"))
  (normal-top-level-add-subdirs-to-load-path))

(eval-when-compile (require 'names))
;;;###autoload
(define-namespace qbo-convert:

(defun x ()
  (push a b))
)

the output:

Edebug: names-edebug-anon0
Edebug: names-edebug-anon1

i appear to be running 20151201.0. (hmm...) cheers.

[greg-minshall]

i suppose this might be from these lines in names.el

      (let ((it (names--get-edebug-spec function))
            (names--verbose (eq function 'push)))

but, as the help string for push says

This is morally equivalent to (setf PLACE (cons NEWELT PLACE)),
except that PLACE is evaluated only once (after NEWELT).

presumably, one can substitute the latter for the former (assuming evaluating PLACE has no side-effects).