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

Repair miscompilation of single-arg apply (bug#69533)

Browse source 
* lisp/emacs-lisp/byte-opt.el (byte-optimize-apply):
Don't optimise single-argument `apply`; it's a legacy construct.
* test/lisp/emacs-lisp/bytecomp-tests.el (bytecomp-tests--test-cases):
Add test case.
This commit is contained in:
Mattias Engdegård 2024-03-04 10:44:19 +01:00
parent 2c2a15bd17
commit b9e8474a44
2 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
test/lisp/emacs-lisp/bytecomp-tests.el
View file

@ -800,6 +800,9 @@ inner loops respectively."
;; Aristotelian identity optimization
(let ((x (bytecomp-test-identity 1)))
(list (eq x x) (eql x x) (equal x x)))
;; Legacy single-arg `apply' call
(apply '(* 2 3))
)
"List of expressions for cross-testing interpreted and compiled code.")