aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/test')
-rw-r--r--stdlib/source/test/aedifex/repository.lux4
-rw-r--r--stdlib/source/test/lux/control/exception.lux6
2 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/test/aedifex/repository.lux b/stdlib/source/test/aedifex/repository.lux
index a3caba277..b76a8f1f1 100644
--- a/stdlib/source/test/aedifex/repository.lux
+++ b/stdlib/source/test/aedifex/repository.lux
@@ -44,11 +44,11 @@
(exception (not_found [uri URI])
(exception.report
- "URI" (%.text uri)))
+ (list ["URI" (%.text uri)])))
(exception (cannot_upload [uri URI])
(exception.report
- "URI" (%.text uri)))
+ (list ["URI" (%.text uri)])))
(type Store
(Dictionary URI Binary))
diff --git a/stdlib/source/test/lux/control/exception.lux b/stdlib/source/test/lux/control/exception.lux
index c31a78b65..09c12275c 100644
--- a/stdlib/source/test/lux/control/exception.lux
+++ b/stdlib/source/test/lux/control/exception.lux
@@ -21,7 +21,7 @@
(def label "YOLO")
(/.exception (custom_exception [value Nat])
- (/.report label (%.nat value)))
+ (/.report (list [label (%.nat value)])))
(def .public test
Test
@@ -75,8 +75,8 @@
(/.when ..an_exception (function (_ ex) wrong))
(/.otherwise (function (_ ex) expected)))))
(_.coverage [/.report]
- (let [report (/.report field0 value0
- field1 value1)]
+ (let [report (/.report (list [field0 value0]
+ [field1 value1]))]
(and (text.contains? field0 report)
(text.contains? value0 report)
(text.contains? field1 report)