suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Good practice: propagate srclocs and stxprops in example

Browse Source
This commit is contained in:
Georges Dupéron 2019-02-23 20:29:58 +01:00 committed by Suzanne Soy
parent ad97ade071
commit fa6bd5cbba
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkgs/racket-doc/syntax/scribblings/parse/experimental.scrbl
View File

@ -370,7 +370,7 @@ invalid binding list.
@examples[#:eval the-eval @examples[#:eval the-eval
(define (my-metafunction-proc stx) (define (my-metafunction-proc stx)
(syntax-case stx () (syntax-case stx ()
[(_ n) (datum->syntax #'n (add1 (syntax-e #'n)))])) [(_ n) (datum->syntax #'n (add1 (syntax-e #'n)) #'n #'n)]))
(begin-for-syntax (begin-for-syntax
(struct mf-struct (proc-id) (struct mf-struct (proc-id)