Re: Enhancement to the syntax system?

[Ludovic Courtès]

Hi,

Stefan Israelsson Tampe <address@hidden> 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’.