safe-copy-tree. Correct mistakes from earlier patch.

* lisp/emacs-lisp/bytecomp.el (compile-defun): Remove unintended change.

* lisp/subr.el (safe-copy-tree--seen): Correct grammatical error in doc
string.
(safe-copy-tree): Delete hash table at end of function.

* doc/lispref/lists.texi (Building Lists): Add an "@end defun" line.
This commit is contained in:
Alan Mackenzie 2023-03-07 15:26:20 +00:00
parent fa83b23611
commit 29f65920fb
3 changed files with 8 additions and 11 deletions

View file

@ -2294,19 +2294,12 @@ With argument ARG, insert value in current buffer after the form."
(symbols-with-pos-enabled t)
(value (eval
(displaying-byte-compile-warnings
;;;; NEW STOUGH, 2023-03-05
(byte-run-strip-symbol-positions
;;;; END OF NEW STOUGH
(byte-compile-sexp
(let ((form (read-positioning-symbols (current-buffer))))
(push form byte-compile-form-stack)
(eval-sexp-add-defvars
form
start-read-position)))
;;;; NEW STOUGH, 2023-03-05
)
;;;; END OF NEW STOUGH
)
start-read-position))))
lexical-binding)))
(cond (arg
(message "Compiling from buffer... done.")