mirror of
https://github.com/urbit/shrub.git
synced 2024-11-28 05:22:27 +03:00
test: remove redundant helpers
This commit is contained in:
parent
95f27d4a7b
commit
241a7165d4
@ -1,20 +1,6 @@
|
||||
:: testing utilities meant to be directly used from files in %/tests
|
||||
::
|
||||
|%
|
||||
++ expect-yes
|
||||
|= [message=tape actual=?]
|
||||
^- tang
|
||||
?: actual ~
|
||||
[leaf+message]~
|
||||
::
|
||||
++ expect-crash
|
||||
|* [message=tape go=(trap)]
|
||||
^- tang
|
||||
=/ res (mule go)
|
||||
?- -.res
|
||||
%| ~
|
||||
%& ~[leaf+"expected crash" leaf+message]
|
||||
==
|
||||
:: +expect-eq: compares :expected and :actual and pretty-prints the result
|
||||
::
|
||||
++ expect-eq
|
||||
|
@ -35,7 +35,7 @@
|
||||
!> (parse-pile:(ford):fusion /sur/foo/hoon ".")
|
||||
::
|
||||
++ test-parse-fail ^- tang
|
||||
%+ expect-crash "parsing should have failed"
|
||||
%- expect-fail
|
||||
|. (parse-pile:(ford):fusion /sur/foo/hoon "[")
|
||||
::
|
||||
++ test-hello-gen ^- tang
|
||||
|
Loading…
Reference in New Issue
Block a user