mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-07 15:00:34 -08:00
Merge from origin/emacs-29
1c67e4f895Fix c-ts-mode indentationd724d7d678Fix c-ts-mode indentation7292b24c80Fix c-ts-mode indentation75cdc1afbe; Change font-lock-variable-name-face to font-lock-variab...b1b3af5b90Update to Org 9.6.1-40-g3d817c80e1037df4Add string-interpolation feature to bash-ts-mode5b8e0b3154Fix tramp-sh-handle-insert-directory2258ed01f4; Minor fix of last change9c18af0cfa* Warn when certain primitives are redefined (bug#61880)5af695c747; * lib-src/etags.c (print_help): Fix indentation.
This commit is contained in:
commit
aad617870b
12 changed files with 129 additions and 52 deletions
|
|
@ -698,11 +698,22 @@ Useful to hook into pass checkers.")
|
|||
(defvar comp-no-spawn nil
|
||||
"Non-nil don't spawn native compilation processes.")
|
||||
|
||||
(defconst comp-warn-primitives
|
||||
'(null memq gethash and subrp not subr-native-elisp-p
|
||||
comp--install-trampoline concat if symbolp symbol-name make-string
|
||||
length aset aref length> mapcar expand-file-name
|
||||
file-name-as-directory file-exists-p native-elisp-load)
|
||||
"List of primitives we want to warn about in case of redefinition.
|
||||
This are essential for the trampoline machinery to work properly.")
|
||||
|
||||
;; Moved early to avoid circularity when comp.el is loaded and
|
||||
;; `macroexpand' needs to be advised (bug#47049).
|
||||
;;;###autoload
|
||||
(defun comp-subr-trampoline-install (subr-name)
|
||||
"Make SUBR-NAME effectively advice-able when called from native code."
|
||||
(when (memq subr-name comp-warn-primitives)
|
||||
(warn "Redefining `%s' might break native compilation of trampolines."
|
||||
subr-name))
|
||||
(unless (or (null native-comp-enable-subr-trampolines)
|
||||
(memq subr-name native-comp-never-optimize-functions)
|
||||
(gethash subr-name comp-installed-trampolines-h))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue