test: add expect arm

This commit is contained in:
lukechampine 2020-02-05 12:09:23 -05:00
parent 26cfc748b6
commit a14d73874a

View File

@ -25,6 +25,11 @@
(~(dunk ut p.expected) %expected) (~(dunk ut p.expected) %expected)
== == == ==
result result
:: +expect: compares :actual to %.y and pretty-prints anything else
::
++ expect
|= actual=vase
(expect-eq !>(%.y) actual)
:: +expect-fail: kicks a trap, expecting crash. pretty-prints if succeeds :: +expect-fail: kicks a trap, expecting crash. pretty-prints if succeeds
:: ::
++ expect-fail ++ expect-fail