10 lines
271 B
Plaintext
10 lines
271 B
Plaintext
(let [match (R.match "a" "12abc")]
|
|
(case match
|
|
((object
|
|
left "12"
|
|
match "a"
|
|
right "bc"))
|
|
(otherwise (throw "bad match result"))))
|
|
|
|
(let [matches (R.distinctMatches "a" "abababab")]
|
|
(assert (= 4 matches.length))) |