[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#46843: 28.0.50; [native-comp] (lambda (x) (if (equal x b) (eq x b) (
From: |
Pip Cet |
Subject: |
bug#46843: 28.0.50; [native-comp] (lambda (x) (if (equal x b) (eq x b) (error ""))) miscompiled |
Date: |
Mon, 1 Mar 2021 06:51:30 +0000 |
In *scratch*, evaluate
(funcall
(let* ((lexical-binding t)
(a (list 'a))
(b (cons a a)))
(native-compile
`(lambda (x) (if (equal x ',b) (eq x ',b) (error "")))))
'((a) a))
Expected result:
nil
Actual result:
t
- bug#46843: 28.0.50; [native-comp] (lambda (x) (if (equal x b) (eq x b) (error ""))) miscompiled,
Pip Cet <=