mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-12 15:01:38 +03:00
Eliminate superfluous |* in funpub.
This commit is contained in:
parent
e473ab7cf4
commit
e35426a8f5
@ -1261,7 +1261,6 @@
|
||||
=+ ven=+((,@ (need (sky %cw p.toe q.toe r.toe ~))))
|
||||
=+ ^= cal :/
|
||||
"path='".
|
||||
"/{(trip (rsh 3 1 p.toe))}".
|
||||
"/{(trip pey)}".
|
||||
"/{(scow %ud ven)}".
|
||||
"/{(trip q.toe)}';"
|
||||
|
@ -390,9 +390,10 @@
|
||||
^- (bolt vase)
|
||||
%+ cope (fade cof %bake how bem)
|
||||
|= [cof=cafe gen=twig]
|
||||
%+ cope (maim cof pit gen)
|
||||
|= [cof=cafe gat=vase]
|
||||
(maul cof gat !>([`beak`[p.bem q.bem r.bem] for +:s.bem rem]))
|
||||
(maim cof pit gen)
|
||||
:: %+ cope (maim cof pit gen)
|
||||
:: |= [cof=cafe gat=vase]
|
||||
:: (maul cof gat !>([`beak`[p.bem q.bem r.bem] for +:s.bem rem]))
|
||||
::
|
||||
++ lace :: load and check
|
||||
|= [cof=cafe for=logo rem=spur bem=beam]
|
||||
|
@ -1,4 +1,4 @@
|
||||
!: |= *
|
||||
!:
|
||||
::::::::: Foobug: a simple application.
|
||||
::
|
||||
|_ [hid=hide vat=[%0 p=@ud]]
|
||||
|
@ -1,3 +1 @@
|
||||
|= rem=spur
|
||||
~& [%html rem]
|
||||
,@
|
||||
|
@ -1,2 +1 @@
|
||||
|= *
|
||||
,@
|
||||
|
@ -1,4 +1,3 @@
|
||||
!:
|
||||
|= *
|
||||
|= htm=@
|
||||
[/text/html (met 3 htm) htm]
|
||||
|
@ -1,2 +1 @@
|
||||
|= *
|
||||
manx
|
||||
|
@ -1,4 +1,3 @@
|
||||
!:
|
||||
|= *
|
||||
|= man=manx
|
||||
(crip (xmlt | man ~))
|
||||
|
@ -1,4 +1,3 @@
|
||||
|= *
|
||||
|= man=manx
|
||||
=+ htm=(crip (xmlt | man ~))
|
||||
[/text/html (met 3 htm) htm]
|
||||
|
@ -1,3 +1 @@
|
||||
|= *
|
||||
json
|
||||
|
||||
|
@ -1,4 +1,3 @@
|
||||
|= *
|
||||
|= jon=json
|
||||
=+ txt=(crip (pojo jon))
|
||||
[/text/json (met 3 txt) txt]
|
||||
|
@ -1 +1 @@
|
||||
|=(* ,@)
|
||||
,@
|
||||
|
@ -1,39 +1,26 @@
|
||||
!:
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|= *
|
||||
=> %= .
|
||||
+
|
||||
=> +
|
||||
=>
|
||||
|%
|
||||
++ down
|
||||
$& [p=down q=down]
|
||||
$% [%$ p=tape]
|
||||
[%code p=tape]
|
||||
[%inco p=tape]
|
||||
[%head p=haxe q=down]
|
||||
[%link p=tape q=tape r=(unit tape)]
|
||||
[%lord p=(list down)]
|
||||
[%lund p=(list down)]
|
||||
[%parg p=down]
|
||||
[%quot p=down]
|
||||
[%rong p=down]
|
||||
[%emph p=down]
|
||||
[%hrul ~]
|
||||
[%html p=tape]
|
||||
==
|
||||
++ haxe
|
||||
|= a=*
|
||||
?@ a
|
||||
?:(&(!=(0 a) (lth a 6)) a 6)
|
||||
6
|
||||
--
|
||||
=> |%
|
||||
++ down
|
||||
$& [p=down q=down]
|
||||
$% [%$ p=tape]
|
||||
[%code p=tape]
|
||||
[%inco p=tape]
|
||||
[%head p=haxe q=down]
|
||||
[%link p=tape q=tape r=(unit tape)]
|
||||
[%lord p=(list down)]
|
||||
[%lund p=(list down)]
|
||||
[%parg p=down]
|
||||
[%quot p=down]
|
||||
[%rong p=down]
|
||||
[%emph p=down]
|
||||
[%hrul ~]
|
||||
[%html p=tape]
|
||||
==
|
||||
++ haxe
|
||||
|= a=*
|
||||
?@ a
|
||||
?:(&(!=(0 a) (lth a 6)) a 6)
|
||||
6
|
||||
--
|
||||
|%
|
||||
++ cott
|
||||
;~ pose
|
||||
|
@ -1,3 +1,2 @@
|
||||
|= *
|
||||
|= htm=@
|
||||
[/text/html (met 3 htm) htm]
|
||||
|
Loading…
Reference in New Issue
Block a user