urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2025-01-01 17:16:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

or-map: added get arm and tested it

Browse Source
This commit is contained in:
Logan Allen 2020-06-05 15:49:53 -04:00
parent d272da0f57
commit 24e0d597ba
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkg/arvo/lib/or-map.hoon
View File

@ -256,7 +256,7 @@
?~ a ~
?: =(b key.n.a)
`val.n.a
?: (ord b key.n.a)
?: (compare b key.n.a)
$(a l.a)
$(a r.a)
::

4
pkg/arvo/tests/lib/or-map.hoon
View File

@ -33,8 +33,8 @@
=/ a=(tree [@ud @tas]) (gas:atom-map ~ test-items)
::
%+ expect-eq
!> [~ [0^%a]]
!> (get:atom-map a 0)
!> [~ %d]
!> (get:atom-map a 3)
::
++ test-ordered-map-sig-get ^- tang
::