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

Provide and document match-expander? and legacy-match-expander?.

Browse Source
This commit is contained in:
Sam Tobin-Hochstadt 2014-01-04 17:55:40 -05:00
parent ade6ebff99
commit aeaf018d01
2 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkgs/racket-pkgs/racket-doc/scribblings/reference/match.scrbl
View File

@ -630,6 +630,13 @@ Like @racket[prop:match-expander], but for the legacy match syntax.
This binding is provided @racket[for-syntax]. This binding is provided @racket[for-syntax].
} }
@deftogether[[
@defproc[(match-expander? [v any/c]) boolean?]
@defproc[(legacy-match-expander? [v any/c]) boolean?]]]{
Predicates for values which implement the appropriate match expander
properties.
}
@defparam[match-equality-test comp-proc (any/c any/c . -> . any)]{ @defparam[match-equality-test comp-proc (any/c any/c . -> . any)]{

4
racket/collects/racket/match/match.rkt
View File

@ -10,13 +10,15 @@
(for-syntax racket/lazy-require (for-syntax racket/lazy-require
(only-in "stxtime.rkt" (only-in "stxtime.rkt"
match-...-nesting match-...-nesting
match-expander?
legacy-match-expander?
prop:match-expander prop:match-expander
prop:legacy-match-expander))) prop:legacy-match-expander)))
(begin-for-syntax (begin-for-syntax
(lazy-require [racket/match/parse (parse)])) (lazy-require [racket/match/parse (parse)]))
(provide (for-syntax match-...-nesting (provide (for-syntax match-...-nesting match-expander? legacy-match-expander?
prop:match-expander prop:legacy-match-expander) prop:match-expander prop:legacy-match-expander)
match-equality-test match-equality-test
define-match-expander define-match-expander