mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-19 12:51:51 +03:00
Hand-merge behn and gall.
This commit is contained in:
parent
61610b4669
commit
9d55c17455
1145
base/arvo/behn.hoon
Normal file
1145
base/arvo/behn.hoon
Normal file
File diff suppressed because it is too large
Load Diff
@ -10,6 +10,20 @@
|
|||||||
== ::
|
== ::
|
||||||
++ bead ,[p=(set beam) q=gage] :: computed result
|
++ bead ,[p=(set beam) q=gage] :: computed result
|
||||||
++ bone ,@ud :: opaque duct
|
++ bone ,@ud :: opaque duct
|
||||||
|
++ club :: agent action
|
||||||
|
$% [%peer p=path] :: subscribe
|
||||||
|
[%poke p=cage] :: apply
|
||||||
|
[%pull ~] :: unsubscribe
|
||||||
|
[%pump ~] :: pump yes/no
|
||||||
|
== ::
|
||||||
|
++ cuft :: internal gift
|
||||||
|
$% [%coup p=(unit tang)] :: poke result
|
||||||
|
[%diff p=cage] :: subscription output
|
||||||
|
[%quit ~] :: close subscription
|
||||||
|
[%reap p=(unit tang)] :: peer result
|
||||||
|
== ::
|
||||||
|
++ cuss (pair term club) :: internal kiss
|
||||||
|
++ suss (trel term ,@tas ,@da) :: config report
|
||||||
++ gift :: out result <-$
|
++ gift :: out result <-$
|
||||||
$% [%back p=?] :: %mess ack good/bad
|
$% [%back p=?] :: %mess ack good/bad
|
||||||
[%crud p=@tas q=(list tank)] :: physical error
|
[%crud p=@tas q=(list tank)] :: physical error
|
||||||
@ -57,6 +71,12 @@
|
|||||||
++ note :: out request $->
|
++ note :: out request $->
|
||||||
$? $: %a :: to %ames
|
$? $: %a :: to %ames
|
||||||
$% [%wont p=sock q=path r=*] ::
|
$% [%wont p=sock q=path r=*] ::
|
||||||
|
== == ::
|
||||||
|
$: %b :: to %behn
|
||||||
|
$% [%deal p=sock q=cuss] :: full transmission
|
||||||
|
== == ::
|
||||||
|
$: %c :: to %clay
|
||||||
|
$% [%warp p=sock q=riff] ::
|
||||||
== == ::
|
== == ::
|
||||||
$: %f :: to %ford
|
$: %f :: to %ford
|
||||||
$% [%exec p=@p q=beak r=(unit silk)] ::
|
$% [%exec p=@p q=beak r=(unit silk)] ::
|
||||||
@ -136,6 +156,10 @@
|
|||||||
$% [%init p=@p] :: only for :begin
|
$% [%init p=@p] :: only for :begin
|
||||||
[%woot p=ship q=coop] ::
|
[%woot p=ship q=coop] ::
|
||||||
[%went p=ship q=cape] :: only for apps
|
[%went p=ship q=cape] :: only for apps
|
||||||
|
== == ::
|
||||||
|
$: %b :: by %behn
|
||||||
|
$% [%onto p=(each suss tang)] ::
|
||||||
|
[%unto p=cuft] ::
|
||||||
== == ::
|
== == ::
|
||||||
$: %g :: by %gall
|
$: %g :: by %gall
|
||||||
$% [%init p=@p] ::
|
$% [%init p=@p] ::
|
||||||
|
Loading…
Reference in New Issue
Block a user