diff options
| author | Eduardo Julian | 2021-09-12 15:39:55 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-09-12 15:39:55 -0400 |
| commit | 2dbbaaec93a53f8dd0b96a0028b9cf125c9066cd (patch) | |
| tree | 14bc8b5abe09b46ef005c3ff7cf132f1d98ddf0d /stdlib/source/test/lux/control/parser/cli.lux | |
| parent | dda05bca0956af5e5b3875c4cc36e61aa04772e4 (diff) | |
Re-named \ => # && \\ => ##
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/test/lux/control/parser/cli.lux | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/stdlib/source/test/lux/control/parser/cli.lux b/stdlib/source/test/lux/control/parser/cli.lux index d8d936cd1..30d0a4460 100644 --- a/stdlib/source/test/lux/control/parser/cli.lux +++ b/stdlib/source/test/lux/control/parser/cli.lux @@ -8,13 +8,13 @@ ["[0]" try] ["<>" parser]] [data - ["[0]" text ("[1]\[0]" equivalence)] + ["[0]" text ("[1]#[0]" equivalence)] [collection ["[0]" list]]] [math ["[0]" random] [number - ["n" nat ("[1]\[0]" decimal)]]]]] + ["n" nat ("[1]#[0]" decimal)]]]]] [\\library ["[0]" /]]) @@ -31,8 +31,8 @@ (<| (_.covering /._) (_.for [/.Parser]) (do [! random.monad] - [expected (\ ! each n\encoded random.nat) - .let [random_dummy (random.only (|>> (text\= expected) not) + [expected (# ! each n#encoded random.nat) + .let [random_dummy (random.only (|>> (text#= expected) not) (random.unicode 5))] dummy random_dummy short (random.unicode 1) @@ -43,12 +43,12 @@ (_.cover [/.result /.any] (|> (/.result /.any (list expected)) (!expect (^multi {try.#Success actual} - (text\= expected actual))))) + (text#= expected actual))))) (_.cover [/.parse] - (|> (/.result (/.parse n\decoded) (list expected)) + (|> (/.result (/.parse n#decoded) (list expected)) (!expect (^multi {try.#Success actual} - (text\= expected - (n\encoded actual)))))) + (text#= expected + (n#encoded actual)))))) (_.cover [/.this] (and (|> (/.result (/.this expected) (list expected)) (!expect {try.#Success _})) @@ -67,16 +67,16 @@ (_.cover [/.named] (|> (/.result (/.named dummy /.any) (list dummy expected)) (!expect (^multi {try.#Success actual} - (text\= expected actual))))) + (text#= expected actual))))) (_.cover [/.parameter] (and (|> (/.result (/.parameter [short long] /.any) (list short expected)) (!expect (^multi {try.#Success actual} - (text\= expected actual)))) + (text#= expected actual)))) (|> (/.result (/.parameter [short long] /.any) (list long expected)) (!expect (^multi {try.#Success actual} - (text\= expected actual)))) + (text#= expected actual)))) (|> (/.result (/.parameter [short long] /.any) (list dummy expected)) (!expect {try.#Failure _})))) |