mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-30 09:00:31 -08:00
Allow unbind to commute with discardN and discardN-preserve-tos
* lisp/emacs-lisp/byte-opt.el (byte-after-unbind-ops): Add discardN and discardN-preserve-tos, both of which commute with unbind. This enables subsequent optimisations.
This commit is contained in:
parent
a50d5b219f
commit
17784bbf3f
1 changed files with 1 additions and 1 deletions
|
|
@ -1955,8 +1955,8 @@ See Info node `(elisp) Integer Basics'."
|
|||
byte-goto-if-not-nil-else-pop))
|
||||
|
||||
(defconst byte-after-unbind-ops
|
||||
;; FIXME: add discardN, discardN-preserve-tos
|
||||
'(byte-constant byte-dup byte-stack-ref byte-stack-set byte-discard
|
||||
byte-discardN byte-discardN-preserve-tos
|
||||
byte-symbolp byte-consp byte-stringp byte-listp byte-numberp byte-integerp
|
||||
byte-eq byte-not
|
||||
byte-cons byte-list1 byte-list2 byte-list3 byte-list4 byte-listN
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue