mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-29 18:06:43 +03:00
rename generators to %say, %ask, %get
This commit is contained in:
parent
81eeb6714e
commit
1755179ce3
@ -470,15 +470,15 @@
|
||||
|= [cay=cage cig=dojo-config]
|
||||
^- [wire silk]
|
||||
:- ?+ -.q.q.cay ~|(%bad-gen ~_((sell (slot 2 q.cay)) !!))
|
||||
%cat /gent
|
||||
%dog /dial
|
||||
%pig /scar
|
||||
%say /gent
|
||||
%ask /dial
|
||||
%get /scar
|
||||
==
|
||||
=+ gat=(slot 3 q.cay)
|
||||
:+ %call (dy-silk-vase gat)
|
||||
:+ (dy-silk-vase !>([now=now.hid eny=eny.hid bec=he-beak]))
|
||||
(dy-silk-sources p.cig)
|
||||
:+ %mute (dy-silk-vase (slot 27 gat))
|
||||
:+ %mute (dy-silk-vase (fall (slew 27 gat) !>(~)))
|
||||
%+ turn (~(tap by q.cig))
|
||||
|= [a=term b=(unit dojo-source)]
|
||||
^- (pair wing silk)
|
||||
@ -536,7 +536,7 @@
|
||||
::
|
||||
%|
|
||||
=+ hiz=;;(hiss +<.q.vax)
|
||||
%- (slog leaf/"< {(earn p.hiz)}" ~)
|
||||
=. ..dy (he-diff %tan leaf/"< {(earn p.hiz)}" ~)
|
||||
(dy-eyre(pro `(slap (slot 7 vax) cnzy/%q)) /scar hiz)
|
||||
==
|
||||
::
|
||||
|
@ -6,7 +6,7 @@
|
||||
::
|
||||
:::::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ arg=[address=@t contact=@t ~] ~]
|
||||
:- %address-contact
|
||||
[address.arg contact.arg]
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
:::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [arg1=cord arg2=cord ~] ~] ::[arg=[cord cord ~] ~]]
|
||||
:- %auth
|
||||
[arg1 arg2]
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
:::::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [amount=@t currency=@t ~] ~]
|
||||
:- %buy
|
||||
[amount currency]
|
||||
|
@ -6,7 +6,7 @@
|
||||
::
|
||||
:::::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ arg=[contact=@t address=@t ~] ~]
|
||||
:- %bit-contact
|
||||
[contact.arg address.arg]
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
:::::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ ~ ~]
|
||||
:- %list
|
||||
~
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
:::::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [amount=@t currency=@t ~] ~]
|
||||
:- %sell
|
||||
[amount currency]
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
:::::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [to=@uc amo=@t ~] ~]
|
||||
[%bit-send to amo]
|
||||
|
||||
|
@ -7,7 +7,7 @@
|
||||
!:
|
||||
::::
|
||||
::
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [arg=(list path)] ~]
|
||||
=- tang/(flop `tang`(zing -))
|
||||
%+ turn arg
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [arg=(list cord) ~]]
|
||||
:- %keys
|
||||
arg
|
||||
|
@ -5,6 +5,6 @@
|
||||
::
|
||||
:::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [arg=tape ~] ~]
|
||||
purl/(scan arg auri:epur)
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [[txt=@tas ~] ~]]
|
||||
:- %noun
|
||||
(crip (weld "hello, " (flop (trip txt))))
|
||||
|
@ -11,7 +11,7 @@
|
||||
++ scug |*([a=@ b=(pole)] ?~(b ~ ?~(a ~ [-.b $(b +.b, a (dec a))])))
|
||||
--
|
||||
[sole .]
|
||||
:- %dog
|
||||
:- %ask
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=_(scug *@ ~[his=*@p tic=*@p]) ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=(list term) ~]
|
||||
==
|
||||
|
@ -1,2 +1,2 @@
|
||||
:- %cat
|
||||
:- %say
|
||||
|=([^ [input=path output=path ~] ~] kiln-cp/[input output])
|
||||
|
@ -1,2 +1,2 @@
|
||||
:- %cat
|
||||
:- %say
|
||||
|=([^ [who=ship mez=$|(~ [a=tape ~])] ~] helm-send-hi/[who ?~(mez ~ `a.mez)])
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[~ ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[[who=@p myl=@t ~] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=[syd=desk lab=@tas ~] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI byk=beak]
|
||||
[arg=$?([dap=term ~] [who=ship dap=term ~]) ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=~ ~]
|
||||
==
|
||||
|
@ -10,7 +10,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bek=beak]
|
||||
[arg=[?(sorc [syd=$|(desk beaky) sorc])] gem=?(%auto germ)]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[[pax=path pot=$|(~ [v=@tas ~])] ~]
|
||||
==
|
||||
|
@ -1,2 +1,2 @@
|
||||
:- %cat
|
||||
:- %say
|
||||
|=([^ [input=path output=path ~] ~] kiln-mv/[input output])
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=~ ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=~ ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=[desk (list term)] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=(list term) ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=~ ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=~ ~]
|
||||
==
|
||||
|
@ -1,2 +1,2 @@
|
||||
:- %cat
|
||||
:- %say
|
||||
|=([^ [input=path ~] ~] kiln-rm/input)
|
||||
|
@ -1,2 +1,2 @@
|
||||
:- %cat
|
||||
:- %say
|
||||
|=([^ [where=path tym=@da eve=@t ~] ~] kiln-schedule/[where tym eve])
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=[@ $|(~ [@ ~])] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=[syd=@tas her=@p sud=@tas ~] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[[syd=@tas syn=?(~ [? ~])] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[[mon=$|(term [span path]) ~] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[arg=[syd=@tas her=@p sud=@tas ~] ~]
|
||||
==
|
||||
|
@ -7,7 +7,7 @@
|
||||
::::
|
||||
!:
|
||||
[sole .]
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@ bec=beak]
|
||||
[~ ~]
|
||||
==
|
||||
|
@ -6,7 +6,7 @@
|
||||
!:
|
||||
::::
|
||||
::
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [arg=path ~] ~]
|
||||
=+ lon=((hard arch) .^(%cy arg))
|
||||
tang/[?~(dir.lon leaf/"~" (subdir arg dir.lon))]~
|
||||
|
@ -1,2 +1,2 @@
|
||||
:- %cat
|
||||
:- %say
|
||||
|=([^ arg=(list ,@) foo=_`@`1 bar=_`@`2] noun/[arg foo bar])
|
@ -3,7 +3,7 @@
|
||||
!:
|
||||
=+ cryp=bruw :: XX change to ec2 ++brew eventually
|
||||
=+ [sole]
|
||||
:- %dog
|
||||
:- %ask
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[[who=ship ~] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[~ ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
::
|
||||
::::
|
||||
!:
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[[her=@p ~] ~]
|
||||
==
|
||||
|
@ -5,7 +5,7 @@
|
||||
!:
|
||||
::::
|
||||
::
|
||||
:- %cat
|
||||
:- %say
|
||||
|= [^ [pax=path fla=$|(~ [%full ~])] ~]
|
||||
=+ len=(lent pax)
|
||||
=+ rend=?^(fla dank:ut |=(a=path (dank:ut (slag len a))))
|
||||
|
@ -3,7 +3,7 @@
|
||||
::::
|
||||
::
|
||||
[twitter .]
|
||||
:- %cat
|
||||
:- %say
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[[who=span msg=cord ~] ~]
|
||||
==
|
||||
|
@ -6,7 +6,7 @@
|
||||
++ baz64 (cook crip (star alp))
|
||||
--
|
||||
!:
|
||||
:- %dog
|
||||
:- %ask
|
||||
|= $: [now=@da eny=@uvI bec=beak]
|
||||
[~ ~]
|
||||
==
|
||||
|
@ -10,7 +10,7 @@
|
||||
|_ [hide ~]
|
||||
++ stat ,[id=@u who=@ta now=@da txt=@t]
|
||||
++ rens
|
||||
:- %cat
|
||||
:- %say
|
||||
|=(stat rose/[": " `~]^~[leaf/"{<now>} @{(trip who)}" leaf/(trip txt)])
|
||||
++ peer ,_`.
|
||||
++ poke--args
|
||||
|
@ -74,9 +74,9 @@
|
||||
(pair hiss $+(httr (sole-request out))) :: fetch and continue
|
||||
:: ::
|
||||
++ sole-gen :: XX virtual type
|
||||
$% [%cat $+((sole-args) (cask))] :: direct noun
|
||||
[%dog $+((sole-args) (sole-product (cask)))] :: dialog
|
||||
[%pig $+((sole-args) (sole-request (cask)))] :: scraper
|
||||
$% [%say $+((sole-args) (cask))] :: direct noun
|
||||
[%ask $+((sole-args) (sole-product (cask)))] :: dialog
|
||||
[%get $+((sole-args) (sole-request (cask)))] :: scraper
|
||||
== ::
|
||||
++ sole-args :: generator arguments
|
||||
|* _[lit=,* opt=,*] ::
|
||||
|
Loading…
Reference in New Issue
Block a user