fix review comments

This commit is contained in:
Philip Monk 2019-03-29 15:39:01 -07:00
parent 73febd4229
commit 3c92eb506b
No known key found for this signature in database
GPG Key ID: B66E1F02604E44EC
8 changed files with 18 additions and 16 deletions

View File

@ -7,7 +7,7 @@
::
/- aquarium
=, aquarium
=> $~ |%
=> |%
+$ move (pair bone card)
+$ card
$% [%poke wire dock %aqua-events (list aqua-event)]
@ -49,6 +49,8 @@
:_ this(subscribed =(command %subscribe))
(aqua-vane-control-handler our ost subscribed command)
::
:: Handle effects from ships. We only react to %send effects.
::
++ diff-aqua-effects
|= [way=wire afs=aqua-effects]
^- (quip move _this)

View File

@ -1,6 +1,6 @@
/- aquarium
=, aquarium
=> $~ |%
=> |%
+$ move (pair bone card)
+$ card
$% [%poke wire dock %aqua-events (list aqua-event)]
@ -102,7 +102,6 @@
::
++ set-timer
|= tim=@da
=. tim +(tim) :: nobody's perfect
~? debug=| [who=who %setting-timer tim]
=. next-timer `tim
=. this (emit-moves [ost %wait /(scot %p who) tim]~)

View File

@ -9,7 +9,7 @@
::
/- aquarium
=, aquarium
=> $~ |%
=> |%
+$ move (pair bone card)
+$ card
$% [%poke wire dock %aqua-events (list aqua-event)]

View File

@ -2,7 +2,7 @@
::
/- aquarium
=, aquarium
=> $~ |%
=> |%
+$ move (pair bone card)
+$ card
$% [%poke wire dock %aqua-events (list aqua-event)]

View File

@ -34,7 +34,7 @@
%look-ethnode
:_ ~
=/ pul
(need (de-purl:html 'http://localhost:8545'))
(need (de-purl:html 'http://eth-mainnet.urbit.org:8545'))
[ost.hid %look /hi |+pul]
::
[%look-kick who=@p]

View File

@ -16,4 +16,5 @@
|%
++ mime [/text/plain (as-octs (of-wain txt))]
--
--
++ grad %mime
--

View File

@ -1,10 +1,10 @@
::
:: Traditionally, ovo refers an event or card, and ova refers to a list
:: of them. We have several versions of each of these depending on
:: context, so we do away with that naming scheme and use the following
:: naming scheme.
:: Traditionally, ovo refers to an ovum -- (pair wire card) -- and ova
:: refers to a list of them. We have several versions of each of these
:: depending on context, so we do away with that naming scheme and use
:: the following naming scheme.
::
:: Every card is either a an `event` or an `effect`. Prepended to this
:: Every card is either an `event` or an `effect`. Prepended to this
:: is `unix` if it has no ship associated with it, or `aqua` if it
:: does. `timed` is added if it includes the time of the event.
::

View File

@ -7199,14 +7199,14 @@
|%
:: azimuth: data contract
::
++ azimuth 0x223c.067f.8cf2.8ae1.73ee.5caf.ea60.ca44.c335.fecb :: mainnet
:: ++ azimuth 0x308a.b6a6.024c.f198.b57e.008d.0ac9.ad02.1988.6579 :: ropsten
:: ++ azimuth 0x223c.067f.8cf2.8ae1.73ee.5caf.ea60.ca44.c335.fecb :: mainnet
++ azimuth 0x863d.9c2e.5c4c.1335.96cf.ac29.d552.55f0.d0f8.6381 :: local bridge
:: ++ azimuth 0x863d.9c2e.5c4c.1335.96cf.ac29.d552.55f0.d0f8.6381 :: local bridge
::
:: launch: block number of azimuth deploy
::
:: ++ launch 6.784.800 :: mainnet
++ launch 0 :: local bridge
++ launch 6.784.800 :: mainnet
:: ++ launch 0 :: local bridge
--
::
:: hashes of ship event signatures