test: tlv

This commit is contained in:
Jōshin 2022-02-13 20:37:34 -06:00
parent 22ef135323
commit e4f5438e88
No known key found for this signature in database
GPG Key ID: A8BE5A9A521639D0

View File

@ -88,7 +88,7 @@
?> ?=(%poke -.r.not)
=* cag cage.r.not
?> ?=(%spider-start p.cag)
=/ rags
=/ rag
:: XX $start-args in %/app/spider/hoon
::
!< [p=(unit @ta) q=(unit @ta) r=beak s=term t=vase]
@ -98,8 +98,8 @@
!> :* ~ `%'khan-fyrd--0vthat.ductt'
[~nul %base %da now] %nonexistent ~
==
!>(rags(t ~))
=/ results-8 (expect-eq !>(~) t.rags)
!>(rag(t ~))
=/ results-8 (expect-eq !>(~) t.rag)
;: weld
results-0 results-1 results-2
results-3 results-4 results-5