[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#62287: Ungexp inside vector problem
From: |
Andrew Tropin |
Subject: |
bug#62287: Ungexp inside vector problem |
Date: |
Mon, 20 Mar 2023 09:49:39 +0400 |
I would expect two last expressions return the same result, but the
former one doesn't do ungexp:
--8<---------------cut here---------------start------------->8---
(define a '(3 4))
(define b `#(1 2 ,a))
(eval-with-store
#~(list '(1 2 #$a))) ;; => ((1 2 (3 4)))
(eval-with-store
#~(list #(1 2 #$a))) ;; => (#(1 2 (ungexp a)))
(eval-with-store
#~(list #$b)) ;; => (#(1 2 4))
--8<---------------cut here---------------end--------------->8---
Am I doing/expecting something wrong or there is a bug here?
--
Best regards,
Andrew Tropin
signature.asc
Description: PGP signature
- bug#62287: Ungexp inside vector problem,
Andrew Tropin <=