1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-21 12:03:55 -08:00

* test/src/comp-test-funcs.el (comp-tests-aref-aset-f) : Fix UB.

This commit is contained in:
Andrea Corallo 2020-07-05 19:45:10 +01:00
parent 3db6ace804
commit 4348969536

View file

@ -66,7 +66,7 @@
(length '(1 2 3)))
(defun comp-tests-aref-aset-f ()
(let ((vec [1 2 3]))
(let ((vec (make-vector 3 0)))
(aset vec 2 100)
(aref vec 2)))