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

Merge pull request #918 from urbit/you-down-with-entropy

Browse Source 
Move from just hashing time to using actual entropy.
This commit is contained in:
Elliot Glaysher 2018-12-06 17:12:35 -08:00 committed by GitHub
commit 245dafcc2e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
sys/arvo.hoon
View File

@ -428,7 +428,7 @@
?~ vanes ~
?. =(lal label.i.vanes) $(vanes t.vanes)
~| [%failed-scry ron bed]
%- scry:(wink:(vent who lal vil bud vane.i.vanes) now (shax now) ..^$)
%- scry:(wink:(vent who lal vil bud vane.i.vanes) now eny ..^$)
[fur ren bed]
::
++ dink :: vase by char
@ -469,7 +469,7 @@
^- [p=(list move) q=_vane]
=+ ven=(vent who lal vil bud vane)
~| [%failed-take lal]
=+ win=(wink:ven now (shax now) beck)
=+ win=(wink:ven now eny beck)
(swim:win org pux hen hil)
::
++ fire :: execute
@ -698,7 +698,7 @@
::
++ poke :: external apply
|= [now=@da ovo=ovum]
=. eny (mix eny (shaz now))
=. eny (shaz (cat 3 eny now))
^- [(list ovum) _+>.$]
::
:: These external events are actually effects on arvo proper.
@ -746,7 +746,7 @@
::
%wack
?> ?=(@ q.q.ovo)
=. eny (mix eny (shaz q.q.ovo))
=. eny (shaz (cat 3 eny q.q.ovo))
[~ +>.$]
==
::