urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-12 18:48:14 +03:00
Code Issues Packages Projects Releases Wiki Activity

Trivial fixes

Browse Source
This commit is contained in:
Jared Hance 2014-08-01 11:35:56 -04:00
parent aaeaa07a04
commit a0fedff20c
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
try/bin/show.hoon
View File

@ -18,10 +18,9 @@
^- (list gift) ^- (list gift)
=+ ran=((hard rang) .^(%cu /(scot %p who)/main/(scot %da tim))) =+ ran=((hard rang) .^(%cu /(scot %p who)/main/(scot %da tim)))
=+ hed=(~(got by hut.ran) (~(got by hit.dom) cas)) =+ hed=(~(got by hut.ran) (~(got by hit.dom) cas))
?~ p.hed !!
=+ ^= par =+ ^= par
?~ fas (~(got by hut.ran) i.p.hed) ?~ fas ?~ p.hed !! (~(got by hut.ran) i.p.hed)
?~ t.fas (~(got by hut.ran) i.p.hed) ?~ t.fas ?~ p.hed !! (~(got by hut.ran) i.p.hed)
(~(got by hut.ran) (~(got by hit.dom) i.t.fas)) :: explicit (~(got by hut.ran) (~(got by hit.dom) i.t.fas)) :: explicit
=+ ^= dif =+ ^= dif
%- %~ zerg ze %- %~ zerg ze