aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/macro/syntax/export.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/test/lux/macro/syntax/export.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/test/lux/macro/syntax/export.lux b/stdlib/source/test/lux/macro/syntax/export.lux
index 1653dc4b4..5455656c0 100644
--- a/stdlib/source/test/lux/macro/syntax/export.lux
+++ b/stdlib/source/test/lux/macro/syntax/export.lux
@@ -22,7 +22,7 @@
(Random [(Maybe Code) Nat])
($_ random.and
(|> random.bit
- (\ random.monad map code.bit)
+ (\ random.monad each code.bit)
random.maybe)
random.nat))
@@ -39,9 +39,9 @@
#.None
(list (code.nat expected_un_exported)))
(<code>.result (/.parser <code>.nat))
- (try\map (function (_ [actual_export_policy actual_un_exported])
- (|> expected_export_policy
- (maybe.else /.default_policy)
- (code\= actual_export_policy)
- (and (n.= expected_un_exported actual_un_exported)))))
+ (try\each (function (_ [actual_export_policy actual_un_exported])
+ (|> expected_export_policy
+ (maybe.else /.default_policy)
+ (code\= actual_export_policy)
+ (and (n.= expected_un_exported actual_un_exported)))))
(try.else false))))))