plt-match.ss/match.ss:
- don't export match:test-no-order, which is only used in generated code test-no-order.ss - reformat code - use ormap instead of let loop render-test-list: - add define/opt sugar - remove a lot of pointless stx arguments - remove a lot of [quasi]syntax/loc gen-match: - use internal define instead of let - remove quasisyntax/loc - reformat - remove pointlessly optional argument coupling-and-binding: - reformat - use memf instead of custom loops svn: r908 original commit: d96e47c4b71b045d48c98f9deac1954492516019
This commit is contained in:
parent
192d52ac51
commit
823893f0ed
|
@ -117,8 +117,7 @@
|
|||
match-equality-test
|
||||
exn:misc:match?
|
||||
exn:misc:match-value
|
||||
define-match-expander
|
||||
match:test-no-order)
|
||||
define-match-expander)
|
||||
|
||||
;; FIXME: match-helper and match-error should each be split
|
||||
;; into a compile-time part and a run-time part.
|
||||
|
|
|
@ -142,8 +142,7 @@
|
|||
exn:misc:match?
|
||||
exn:misc:match-value
|
||||
match-equality-test
|
||||
define-match-expander
|
||||
match:test-no-order)
|
||||
define-match-expander)
|
||||
|
||||
(require "private/match-internal-func.ss"
|
||||
"private/match-expander.ss"
|
||||
|
|
Loading…
Reference in New Issue
Block a user