2018-02-16 03:18:47 +03:00
|
|
|
::
|
|
|
|
|
|%
|
|
|
|
|
++ data :> typed data
|
|
|
|
|
$% [%address p=@ux]
|
|
|
|
|
[%string p=tape]
|
|
|
|
|
[%bool p=?]
|
|
|
|
|
[%int p=@sd]
|
|
|
|
|
[%uint p=@ud]
|
|
|
|
|
[%real p=@rs]
|
|
|
|
|
[%ureal p=@urs]
|
2018-03-12 19:01:27 +03:00
|
|
|
[%bytes-n p=octs]
|
|
|
|
|
[%bytes p=octs]
|
2018-02-16 03:18:47 +03:00
|
|
|
[%array-n p=(list data)]
|
|
|
|
|
[%array p=(list data)]
|
|
|
|
|
==
|
2018-03-13 02:42:24 +03:00
|
|
|
::
|
|
|
|
|
:: ethereum json rpc api
|
|
|
|
|
::TODO make single ++eth-rpc core, or split off into separate sur+lib
|
|
|
|
|
::
|
|
|
|
|
++ jrpc-api
|
|
|
|
|
|%
|
|
|
|
|
++ request
|
|
|
|
|
$% [%eth-block-number ~]
|
|
|
|
|
[%eth-call cal=call deb=default-block]
|
|
|
|
|
[%eth-estimate-gas cal=call deb=default-block]
|
|
|
|
|
==
|
|
|
|
|
::
|
|
|
|
|
++ call
|
|
|
|
|
$: from=(unit @i)
|
|
|
|
|
to=@i
|
|
|
|
|
gas=(unit @ud)
|
|
|
|
|
gas-price=(unit @ud)
|
|
|
|
|
value=(unit @ud)
|
|
|
|
|
data=tape
|
|
|
|
|
==
|
|
|
|
|
::
|
|
|
|
|
++ default-block
|
|
|
|
|
$% [%quantity n=@ud]
|
|
|
|
|
[%label l=?(%earliest %latest %pending)]
|
|
|
|
|
==
|
|
|
|
|
--
|
2018-02-16 03:18:47 +03:00
|
|
|
--
|
