[debbugs-tracker] bug#20546: closed (Syntax bug in master branch (till d99fedc5fd38c0))

[GNU bug Tracking System]

Your message dated Sun, 07 Aug 2016 12:32:18 +0200
with message-id <address@hidden>
and subject line Re: bug#20546: Syntax bug in master branch (till 
d99fedc5fd38c0)
has caused the debbugs.gnu.org bug report #20546,
regarding Syntax bug in master branch (till d99fedc5fd38c0)
to be marked as done.

(If you believe you have received this mail in error, please contact
address@hidden)


-- 
20546: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=20546
GNU Bug Tracking System
Contact address@hidden with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> Syntax bug in master branch (till d99fedc5fd38c0)
>
>
>
>
> Date: 
>
> Mon, 11 May 2015 18:29:26 +0800
>
>
>
>
> I'm using master branch (till d99fedc5fd38c0), and I found this code
> can't run in 2.1, but works in 2.0:
>
> ---------------------------------code-------------------------------
> (define-syntax define-art
>   (lambda (x)
>    (syntax-case x ()
>     ((_ name) (identifier? #'name)
>      #`(begin
>         (define name 2)
>         (define #,(datum->syntax #'name
>                   (symbol-append 'define- (syntax->datum #'name)))
>                 33))))))
> ----------------------------------end-------------------------------
>
> Of course, the meaning of this code is trivial.
>
>
>
>
>
>
> --- End Message ---
> --- Begin Message ---
>
>
>
> Subject: 
>
> Re: bug#20546: Syntax bug in master branch (till d99fedc5fd38c0)
>
>
>
>
> Date: 
>
> Sun, 07 Aug 2016 12:32:18 +0200
>
>
>
>
> User-agent: 
>
> Gnus/5.13 (Gnus v5.13) Emacs/24.5 (gnu/linux)
>
>
>
>
> On Thu 23 Jun 2016 22:27, Andy Wingo <address@hidden> writes:
>
> > On Mon 11 May 2015 12:29, Nala Ginrut <address@hidden> writes:
> >
> >> I'm using master branch (till d99fedc5fd38c0), and I found this code
> >> can't run in 2.1, but works in 2.0:
> >>
> >> (define-syntax define-art
> >>   (lambda (x)
> >>    (syntax-case x ()
> >>     ((_ name) (identifier? #'name)
> >>      #`(begin
> >>         (define name 2)
> >>         (define #,(datum->syntax #'name
> >>                   (symbol-append 'define- (syntax->datum #'name)))
> >>                 33))))))
> >>
> >> Of course, the meaning of this code is trivial.
> >
> > Works for me:
>
> Closing bug.  Please re-open if you can reproduce it; cheers :)
>
> Andy
>
>
> --- End Message ---