emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

feature/native-comp 4348969 06/14: * test/src/comp-test-funcs.el (comp-t


From: Andrea Corallo
Subject: feature/native-comp 4348969 06/14: * test/src/comp-test-funcs.el (comp-tests-aref-aset-f) : Fix UB.
Date: Thu, 9 Jul 2020 11:57:52 -0400 (EDT)

branch: feature/native-comp
commit 4348969536f2d2a16e794ff3ce15f855f9ec7e1e
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * test/src/comp-test-funcs.el (comp-tests-aref-aset-f) : Fix UB.
---
 test/src/comp-test-funcs.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/src/comp-test-funcs.el b/test/src/comp-test-funcs.el
index 168819b..2fe6276 100644
--- a/test/src/comp-test-funcs.el
+++ b/test/src/comp-test-funcs.el
@@ -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)))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]