utils.rkt (955B)
1 #lang racket 2 3 (require scribble/manual 4 scribble/example) 5 6 (provide (all-defined-out)) 7 8 (define ntax-pattern (tech #:doc '(lib "syntax/scribblings/syntax.scrbl") 9 #:key "syntax pattern" 10 "syntax-pattern")) 11 12 (define -alternative-mixin (tech #:key "eh-alternative mixin" 13 #:doc '(lib "extensible-parser-specifications/scribblings/extensible-parser-specifications.scrbl") 14 "eh-alternative-mixin")) 15 16 (define tribute-name (tech #:doc '(lib "syntax/scribblings/syntax.scrbl") 17 #:key "attribute" 18 "attribute-name")) 19 20 (define A-patte (tech #:doc '(lib "syntax/scribblings/syntax.scrbl") 21 #:key "action pattern" 22 "A-pattern")) 23 24 (define make-evaluator 25 (make-eval-factory '(syntax/parse 26 extensible-parser-specifications)))