diff options
Diffstat (limited to 'stdlib/source/test/lux/meta.lux')
-rw-r--r-- | stdlib/source/test/lux/meta.lux | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/stdlib/source/test/lux/meta.lux b/stdlib/source/test/lux/meta.lux index 67529dcca..4010b9ce1 100644 --- a/stdlib/source/test/lux/meta.lux +++ b/stdlib/source/test/lux/meta.lux @@ -114,8 +114,8 @@ #.extensions [] #.host []}]] ($_ _.and - (_.cover [/.fail] - (|> (/.fail expected_error) + (_.cover [/.failure] + (|> (/.failure expected_error) (: (Meta Any)) (/.run expected_lux) (!expect (^multi (#try.Failure actual_error) @@ -133,20 +133,20 @@ (_.cover [/.either] (and (|> (/.either (\ /.monad wrap expected) (: (Meta Nat) - (/.fail expected_error))) + (/.failure expected_error))) (/.run expected_lux) (!expect (^multi (#try.Success actual) (n.= expected actual)))) (|> (/.either (: (Meta Nat) - (/.fail expected_error)) + (/.failure expected_error)) (\ /.monad wrap expected)) (/.run expected_lux) (!expect (^multi (#try.Success actual) (n.= expected actual)))) (|> (/.either (: (Meta Nat) - (/.fail expected_error)) + (/.failure expected_error)) (: (Meta Nat) - (/.fail expected_error))) + (/.failure expected_error))) (/.run expected_lux) (!expect (^multi (#try.Failure actual_error) (text\= (location.with location.dummy expected_error) @@ -261,13 +261,13 @@ (|> (/.imported? imported_module_name) (/.run expected_lux) (try.default false))) - (_.cover [/.normalize] - (and (|> (/.normalize ["" expected_short]) + (_.cover [/.normal] + (and (|> (/.normal ["" expected_short]) (/.run expected_lux) (!expect (^multi (#try.Success [actual_module actual_short]) (and (text\= expected_current_module actual_module) (is? expected_short actual_short))))) - (|> (/.normalize [dummy_module expected_short]) + (|> (/.normal [dummy_module expected_short]) (/.run expected_lux) (!expect (^multi (#try.Success [actual_module actual_short]) (and (text\= dummy_module actual_module) |