provide prop:template-metafunction and template-metafunction?
from syntax/parse/experimental/template
This commit is contained in:
parent
057bcab015
commit
b25cf850fa
|
@ -1,14 +1,18 @@
|
||||||
#lang racket/base
|
#lang racket/base
|
||||||
(require (for-syntax racket/base)
|
(require (for-syntax racket/base)
|
||||||
(only-in racket/private/template
|
(only-in racket/private/template
|
||||||
template-metafunction))
|
template-metafunction
|
||||||
|
prop:template-metafunction
|
||||||
|
template-metafunction?))
|
||||||
(provide (rename-out [syntax template]
|
(provide (rename-out [syntax template]
|
||||||
[syntax/loc template/loc]
|
[syntax/loc template/loc]
|
||||||
[quasisyntax quasitemplate]
|
[quasisyntax quasitemplate]
|
||||||
[quasisyntax/loc quasitemplate/loc]
|
[quasisyntax/loc quasitemplate/loc]
|
||||||
[~? ??]
|
[~? ??]
|
||||||
[~@ ?@])
|
[~@ ?@])
|
||||||
define-template-metafunction)
|
define-template-metafunction
|
||||||
|
(for-syntax prop:template-metafunction
|
||||||
|
template-metafunction?))
|
||||||
|
|
||||||
;; ============================================================
|
;; ============================================================
|
||||||
;; Metafunctions
|
;; Metafunctions
|
||||||
|
|
Loading…
Reference in New Issue
Block a user