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:
parent
fa83b23611
commit
29f65920fb
3 changed files with 8 additions and 11 deletions
|
@ -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.")
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue