bug#62287: Ungexp inside vector problem

2023-06-14 Thread Andrew Tropin
On 2023-03-20 11:45, Josselin Poiret wrote: > Hi Andrew, > > Andrew Tropin writes: > >> 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

bug#62287: Ungexp inside vector problem

2023-03-20 Thread Josselin Poiret via Bug reports for GNU Guix
Hi Andrew, Andrew Tropin writes: > 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)))

bug#62287: Ungexp inside vector problem

2023-03-19 Thread Andrew Tropin
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