diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/test/lux/control/parser/analysis.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/test/lux/control/parser/analysis.lux b/stdlib/source/test/lux/control/parser/analysis.lux index dca66b9ef..f09967760 100644 --- a/stdlib/source/test/lux/control/parser/analysis.lux +++ b/stdlib/source/test/lux/control/parser/analysis.lux @@ -9,9 +9,9 @@ ["." exception] ["<>" parser]] [data - ["." name ("#@." equivalence)] - ["." bit ("#@." equivalence)] - ["." text ("#@." equivalence)] + ["." name ("#\." equivalence)] + ["." bit ("#\." equivalence)] + ["." text ("#\." equivalence)] [number ["n" nat] ["i" int] @@ -79,15 +79,15 @@ (/.run (<check> expected)) (!expect (#try.Success _)))))] - [/.bit /.bit! random.bit analysis.bit bit@=] + [/.bit /.bit! random.bit analysis.bit bit\=] [/.nat /.nat! random.nat analysis.nat n.=] [/.int /.int! random.int analysis.int i.=] [/.frac /.frac! random.safe-frac analysis.frac f.=] [/.rev /.rev! random.rev analysis.rev r.=] - [/.text /.text! (random.unicode 10) analysis.text text@=] + [/.text /.text! (random.unicode 10) analysis.text text\=] [/.local /.local! random.nat analysis.variable/local n.=] [/.foreign /.foreign! random.nat analysis.variable/foreign n.=] - [/.constant /.constant! ..constant analysis.constant name@=] + [/.constant /.constant! ..constant analysis.constant name\=] )) (do {! random.monad} [expected random.bit] @@ -95,7 +95,7 @@ (|> (list (analysis.tuple (list (analysis.bit expected)))) (/.run (/.tuple /.bit)) (case> (#try.Success actual) - (bit@= expected actual) + (bit\= expected actual) (#try.Failure _) false)))) |