Hi, Stefan Israelsson Tampe <stefan.ita...@gmail.com> skribis:
> racket: > (define-for-syntax (f x) #`(let ((x 1)) #,x)) >> (define-syntax (g x) (syntax-case x ()((_ y) #`(let ((x y)) #,(f #'x)))) > ) >> (g 4) > 4 > > In guile, > scheme@(guile-user)> (define (f x) #`(let ((x 1)) #,x)) > scheme@(guile-user)> (define-syntax g (lambda (x) (syntax-case x () ((_ y) > #`(let ((x y)) #,(f #'x)))))) > scheme@(guile-user)> (g 4) > $1 = 1 > ! > > I much prefer rackets version here. I will file a bug report and also try > to understand what spec that racket is following! Aaah, indeed, that’s a “better” outcome! :-) Ludo’.
