mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

adding ops

Browse source
This commit is contained in:
Andrea Corallo 2019-07-20 17:22:13 +02:00 • committed by Andrea Corallo
parent c7341aad72
commit 45a4510738
1 changed files with 11 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

26
lisp/emacs-lisp/comp.el
View file

@ -497,23 +497,19 @@ the annotation emission."
(comp-emit-set-call `(callref Fconcat 3 ,(comp-sp))))
(byte-concat4
(comp-emit-set-call `(callref Fconcat 4 ,(comp-sp))))
(byte-sub1)
(byte-add1)
(byte-eqlsign
(comp-emit-set-call `(call Fstring_equal
,(comp-slot)
,(comp-slot-next))))
(byte-gtr)
(byte-lss)
(byte-leq)
(byte-geq)
(byte-diff)
(byte-negate)
(byte-plus
(comp-emit-set-call `(callref Fplus 2 ,(comp-sp))))
(byte-sub1 1+ Fadd1)
(byte-add1 1- Fsub1)
(byte-eqlsign string-equal Fstring-equal)
(byte-gtr > Fgtr)
(byte-lss < Flss)
(byte-leq <= Fleq)
(byte-geq >= Fgeq)
(byte-diff - Fmius)
(byte-negate null Fnull)
(byte-plus + Fplus)
(byte-max auto)
(byte-min auto)
(byte-mult)
(byte-mult * Ftimes)
(byte-point auto)
(byte-goto-char auto)
(byte-insert auto)