urbit/main/app/test-cede/core.hook

|_  [hid=hide ~]
++  prep
  |=  *
  ~&  %prep
  :_  +>.$
  :~
      [0 %pass / %g %sire %demo %nino]
  ==
++  peer
  |=  *
  ~&  >  [%cede-app-peer cub.hid]
  :_  +>.$
  :~  [0 %pass / %g %cide %$]
  ==
++  poke
  |=  *
  ~&  >  [%cede-app-poke cub.hid]
  :_  +>.$
  :~  [0 %pass / %g %cide %$]
  ==
++  part
  |=  ost=bone
  ~&  [%part ost]
  :_  ~
  :*  ost  %pass  /write  %c  %info  our.hid
      (foal /(scot %p our.hid)/try/(scot %da lat.hid)/hi 'hallo')
  ==
--
cede test app 2014-09-17 04:20:46 +04:00			`\|_ [hid=hide ~]`
			`++ prep`
			`\|= *`
			`~& %prep`
			`:_ +>.$`
%gall seems to be working 2014-09-18 01:23:48 +04:00			`:~`
			`[0 %pass / %g %sire %demo %nino]`
			`==`
			`++ peer`
			`\|= *`
			`~& > [%cede-app-peer cub.hid]`
			`:_ +>.$`
			`:~ [0 %pass / %g %cide %$]`
			`==`
			`++ poke`
			`\|= *`
			`~& > [%cede-app-poke cub.hid]`
			`:_ +>.$`
			`:~ [0 %pass / %g %cide %$]`
cede test app 2014-09-17 04:20:46 +04:00			`==`
			`++ part`
			`\|= ost=bone`
			`~& [%part ost]`
			`:_ ~`
			`:* ost %pass /write %c %info our.hid`
%gall seems to be working 2014-09-18 01:23:48 +04:00			`(foal /(scot %p our.hid)/try/(scot %da lat.hid)/hi 'hallo')`
cede test app 2014-09-17 04:20:46 +04:00			`==`
			`--`