diff options
Diffstat (limited to 'stdlib/source/test/lux/control/parser/analysis.lux')
-rw-r--r-- | stdlib/source/test/lux/control/parser/analysis.lux | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/stdlib/source/test/lux/control/parser/analysis.lux b/stdlib/source/test/lux/control/parser/analysis.lux index 074115336..32d758505 100644 --- a/stdlib/source/test/lux/control/parser/analysis.lux +++ b/stdlib/source/test/lux/control/parser/analysis.lux @@ -83,15 +83,15 @@ (/.result (<check> expected)) (!expect {try.#Success _}))))] - [/.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#=] - [/.local /.local! random.nat analysis.local n.=] - [/.foreign /.foreign! random.nat analysis.foreign n.=] - [/.constant /.constant! ..constant analysis.constant symbol#=] + [/.bit /.this_bit random.bit analysis.bit bit#=] + [/.nat /.this_nat random.nat analysis.nat n.=] + [/.int /.this_int random.int analysis.int i.=] + [/.frac /.this_frac random.safe_frac analysis.frac f.=] + [/.rev /.this_rev random.rev analysis.rev r.=] + [/.text /.this_text (random.unicode 10) analysis.text text#=] + [/.local /.this_local random.nat analysis.local n.=] + [/.foreign /.this_foreign random.nat analysis.foreign n.=] + [/.constant /.this_constant ..constant analysis.constant symbol#=] )) (do [! random.monad] [expected random.bit] @@ -117,10 +117,10 @@ (!expect {try.#Success #0}))))) (do [! random.monad] [dummy random.bit] - (_.cover [/.end!] - (and (|> (/.result /.end! (list)) + (_.cover [/.end] + (and (|> (/.result /.end (list)) (!expect {try.#Success _})) - (|> (/.result /.end! (list (analysis.bit dummy))) + (|> (/.result /.end (list (analysis.bit dummy))) (!expect {try.#Failure _}))))) (do [! random.monad] [expected random.bit] |