diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux index 737c38fd3..f801ebebd 100644 --- a/stdlib/source/lux.lux +++ b/stdlib/source/lux.lux @@ -5460,12 +5460,12 @@ (: (List [Code Code]) (reverse levels)))] (list init-pattern inner-pattern-body))) -(macro: #export (^=> tokens) +(macro: #export (^multi tokens) {#;doc (doc "Multi-level pattern matching." "Useful in situations where the result of a branch depends on further refinements on the values being matched." "For example:" (case (split (size static) uri) - (^=> (#;Some [chunk uri']) [(Text/= static chunk) true]) + (^multi (#;Some [chunk uri']) [(Text/= static chunk) true]) (match-uri endpoint? parts' uri') _ @@ -5474,7 +5474,7 @@ "Short-cuts can be taken when using boolean tests." "The example above can be rewritten as..." (case (split (size static) uri) - (^=> (#;Some [chunk uri']) (Text/= static chunk)) + (^multi (#;Some [chunk uri']) (Text/= static chunk)) (match-uri endpoint? parts' uri') _ @@ -5501,7 +5501,7 @@ (wrap output))) _ - (fail "Wrong syntax for ^=>"))) + (fail "Wrong syntax for ^multi"))) (macro: #export (ident-for tokens) {#;doc (doc "Given a symbol or a tag, gives back a 2 tuple with the prefix and name parts, both as Text." |