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

Cleaned up some cosmetics.

Browse Source
This commit is contained in:
C. Guy Yarvin 2015-12-20 13:48:02 -08:00
parent 9fa3e1c23f
commit a1c0ec5e26
4 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ape/work.hoon
View File

@ -25,7 +25,7 @@
|_ $: bowl
client
connected/? :: subscribed to talk
count/@ud :: # messages from talk
count/@ud :: / messages from talk
unordered/(map {@uvH @u} (pair ship flesh:work-stuff:talk))
==
++ at

2
arvo/ames.hoon
View File

@ -1002,7 +1002,7 @@
++ czar !: :: czar:am
|= {our/ship ger/@uw fak/?} :: instantiate emperor
^- {p/(list boon) q/fort}
=+ loy=?:(fak (bruw 2.048 our) (bruw 2.048 ger)) :: fake uses carrier #
=+ loy=?:(fak (bruw 2.048 our) (bruw 2.048 ger)) :: fake uses carrier /
=+ fim==(fig:ex:loy (zeno our))
?: &(!fak !fim) !! :: not fake & bad fig
=+ mac=`mace`[[0 sec:ex:loy] ~]

6
arvo/hoon.hoon
View File

@ -2166,7 +2166,7 @@
(add (lsh 4 muc i.f.rip) $(f.rip t.f.rip))
(con (lsh 6 1 sec) fac)
::
++ yall :: day # to day of year
++ yall :: day / to day of year
|= day/@ud
^- {y/@ud m/@ud d/@ud}
=+ [era=0 cet=0 lep=*?]
@ -6269,7 +6269,7 @@
^- type
?:(|(=(%void der) =(%void s.bid)) %void [%bull bid der])
::
++ cain |=(vax/vase (sell vax)) :: $+(vase tank) for #>
++ cain |=(vax/vase (sell vax)) :: $+(vase tank) for />
++ cell :: make %cell type
~/ %cell
|= {hed/type tal/type}
@ -6518,7 +6518,7 @@
|= txt/@
q:(~(mint ut %noun) %noun (ream txt))
::
++ noah |=(vax/vase (pave vax)) :: $+(vase tape) for #<
++ noah |=(vax/vase (pave vax)) :: $+(vase tape) for /<
++ onan |=(vix/vise (seer vix)) :: $+(vise vase) for !>
++ rain :: parse with % path
|= {bon/path txt/@}

2
lib/down-jet/rend.hoon
View File

@ -205,7 +205,7 @@
?~ a ~
:: ?: (gth i.a 0xff) "XX" :: XX
?: ?| [?=(^ q)]:(alp 1^1 a)
(~(has in (sa "!*'();:@&=+$,/?#%.~_")) i.a) :: XX reparse
(~(has in (sa "!*'();:@&=+$,/?/%.~_")) i.a) :: XX reparse
==
[i.a $(a t.a)]
(weld (urle (trip i.a)) $(a t.a))