aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test
diff options
context:
space:
mode:
authorEduardo Julian2022-07-08 13:02:38 -0400
committerEduardo Julian2022-07-08 13:02:38 -0400
commitcf3ffce3165dcbf741a5f2d6daa1146ad50fd95c (patch)
treeb6ac05b4e88c64a8c6b6a331ab1bb26c4bac8229 /stdlib/source/test
parent523074289af8d9b473ed89e60fa586498de75aff (diff)
Extensible macro vocabulary for "lux/macro/pattern.`".
Diffstat (limited to 'stdlib/source/test')
-rw-r--r--stdlib/source/test/lux/meta/macro.lux2
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/source/test/lux/meta/macro.lux b/stdlib/source/test/lux/meta/macro.lux
index d128a74be..e2705e961 100644
--- a/stdlib/source/test/lux/meta/macro.lux
+++ b/stdlib/source/test/lux/meta/macro.lux
@@ -178,7 +178,7 @@
<actual> (/.times <cycles> (..iterated <max> <expected>))]
(let [expected_remaining (n.- <cycles> <max>)]
(case (` <actual>)
- (^.` (..iterated (, [_ {.#Nat actual_remaining}]) (, [_ {.#Nat actual}])))
+ (^.` (..iterated (^., [_ {.#Nat actual_remaining}]) (^., [_ {.#Nat actual}])))
(and (n.= expected_remaining actual_remaining)
(n.= <expected> actual))