RE: [racket-users] Questions: free-identifier=?; literal-id in syntax-case

2015-04-05 Thread Jos Koot
] On Behalf Of Alexander D. Knauth Sent: sábado, 04 de abril de 2015 19:35 To: Jos Koot Cc: racket-users@googlegroups.com Subject: Re: [racket-users] Questions: free-identifier=?; literal-id in syntax-case On Apr 4, 2015, at 11:22 AM, Jos Koot jos.k...@gmail.com wrote: The following puzzles me

RE: [racket-users] Questions: free-identifier=?; literal-id in syntax-case

2015-04-05 Thread Jos Koot
Subject: Re: [racket-users] Questions: free-identifier=?; literal-id in syntax-case On Apr 5, 2015, at 4:07 AM, Jos Koot jos.k...@gmail.com wrote: Your argument that a literal-id may occur more than once in a pattern makes sense. I'll play with syntax-parse and (_ (~and + (~literal

[racket-users] Questions: free-identifier=?; literal-id in syntax-case

2015-04-04 Thread Jos Koot
The following puzzles me: #lang racket (define plus +) (free-identifier=? #'+ #'plus) ; - #f #lang racket (define-syntax (a stx) (syntax-case stx () ((_) (datum-syntax stx (free-identifier=? #'+ #'plus) (define plus +) (a) ; - #f #lang racket (define plus +) (define-syntax (a stx)

Re: [racket-users] Questions: free-identifier=?; literal-id in syntax-case

2015-04-04 Thread Alexander D. Knauth
On Apr 4, 2015, at 11:22 AM, Jos Koot jos.k...@gmail.com wrote: The following puzzles me: #lang racket (define plus +) (free-identifier=? #'+ #'plus) ; - #f #lang racket (define-syntax (a stx) (syntax-case stx () ((_) (datum-syntax stx (free-identifier=? #'+ #'plus) (define