ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-24 23:44:56 +03:00
Code Issues Packages Projects Releases Wiki Activity

mall, hood: deduplicate types in libs

Browse Source
This commit is contained in:
Philip Monk 2019-09-13 13:01:04 -07:00
parent d7671efec0
commit eeac28bdc6
No known key found for this signature in database
GPG Key ID: B66E1F02604E44EC
5 changed files with 47 additions and 50 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
bin/solid.pill
View File

@ -1,3 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:c7b503de1c4f8627920b59131b1aa23d198f68abaf3a64c5c3388ec77c539b69
size 15516353
oid sha256:617f028e5c381e8adf813d5b18e81c6b1ddd676049c4e520308af545a20999d2
size 15663155

12
pkg/arvo/lib/hood/drum-mall.hoon
View File

@ -220,12 +220,12 @@
++ poke
|= [=mark =vase]
?+ mark ~|([%poke-drum-bad-mark mark] !!)
%drum-put (poke-put (need !<([path @] vase)))
%drum-link (poke-link (need !<(gill:gall vase)))
%drum-unlink (poke-unlink (need !<(gill:gall vase)))
%drum-exit (poke-exit (need !<(~ vase)))
%drum-start (poke-start (need !<(well:gall vase)))
%drum-set-boot-apps (poke-set-boot-apps (need !<(? vase)))
%drum-put =;(f (f (need !<(_+<.f vase))) poke-put)
%drum-link =;(f (f (need !<(_+<.f vase))) poke-link)
%drum-unlink =;(f (f (need !<(_+<.f vase))) poke-unlink)
%drum-exit =;(f (f (need !<(_+<.f vase))) poke-exit)
%drum-start =;(f (f (need !<(_+<.f vase))) poke-start)
%drum-set-boot-apps =;(f (f (need !<(_+<.f vase))) poke-set-boot-apps)
==
::
++ reap-phat :: ack connect

31
pkg/arvo/lib/hood/helm-mall.hoon
View File

@ -194,23 +194,20 @@
++ poke
|= [=mark =vase]
?+ mark ~|([%poke-helm-bad-mark mark] !!)
%helm-hi (poke-hi (need !<(@t vase)))
%helm-mass (poke-mass (need !<(~ vase)))
%helm-reload (poke-reload (need !<((list term) vase)))
%helm-reload-desk (poke-reload-desk (need !<([@t (list term)] vase)))
%helm-reset (poke-reset (need !<(~ vase)))
%helm-send-hi (poke-send-hi (need !<([ship (unit tape)] vase)))
%helm-verb (poke-verb (need !<(~ vase)))
%helm-rekey (poke-rekey (need !<(@t vase)))
%helm-nuke (poke-nuke (need !<(ship vase)))
%helm-automass (poke-automass (need !<(@dr vase)))
%helm-bonk (poke-bonk (need !<(~ vase)))
%helm-cancel-automass
(poke-cancel-automass (need !<(~ vase)))
%helm-moon
(poke-moon (need !<((unit [ship udiff:point:able:jael]) vase)))
%helm-serve
(poke-serve (need !<([=binding:eyre =generator:eyre] vase)))
%helm-hi =;(f (f (need !<(_+<.f vase))) poke-hi)
%helm-mass =;(f (f (need !<(_+<.f vase))) poke-mass)
%helm-reload =;(f (f (need !<(_+<.f vase))) poke-reload)
%helm-reload-desk =;(f (f (need !<(_+<.f vase))) poke-reload-desk)
%helm-reset =;(f (f (need !<(_+<.f vase))) poke-reset)
%helm-send-hi =;(f (f (need !<(_+<.f vase))) poke-send-hi)
%helm-verb =;(f (f (need !<(_+<.f vase))) poke-verb)
%helm-rekey =;(f (f (need !<(_+<.f vase))) poke-rekey)
%helm-nuke =;(f (f (need !<(_+<.f vase))) poke-nuke)
%helm-automass =;(f (f (need !<(_+<.f vase))) poke-automass)
%helm-bonk =;(f (f (need !<(_+<.f vase))) poke-bonk)
%helm-cancel-automass =;(f (f (need !<(_+<.f vase))) poke-cancel-automass)
%helm-moon =;(f (f (need !<(_+<.f vase))) poke-moon)
%helm-serve =;(f (f (need !<(_+<.f vase))) poke-serve)
==
::
++ take-agent

42
pkg/arvo/lib/hood/kiln-mall.hoon
View File

@ -185,27 +185,27 @@
++ poke
|= [=mark =vase]
?+ mark ~|([%poke-kiln-bad-mark mark] !!)
%kiln-commit (poke-commit (need !<([term ?] vase)))
%kiln-info (poke-info (need !<([tape (unit toro:clay)] vase)))
%kiln-label (poke-label (need !<([desk @tas] vase)))
%kiln-cancel (poke-cancel (need !<(desk vase)))
%kiln-mount (poke-mount (need !<([path term] vase)))
%kiln-rm (poke-rm (need !<(path vase)))
%kiln-schedule (poke-schedule (need !<([path @da @t] vase)))
%kiln-track (poke-track (need !<(kiln-sync vase)))
%kiln-sync (poke-sync (need !<(kiln-sync vase)))
%kiln-syncs (poke-syncs (need !<(~ vase)))
%kiln-wipe-ford (poke-wipe-ford (need !<(@ud vase)))
%kiln-keep-ford (poke-keep-ford (need !<([@ud @ud] vase)))
%kiln-autoload (poke-autoload (need !<((unit ?) vase)))
%kiln-overload (poke-overload (need !<([@dr @da] vase)))
%kiln-wash-gall (poke-wash-gall (need !<(* vase)))
%kiln-unmount (poke-unmount (need !<($@(term [knot path]) vase)))
%kiln-unsync (poke-unsync (need !<(kiln-unsync vase)))
%kiln-permission (poke-permission (need !<([desk path ?] vase)))
%kiln-cancel-autocommit (poke-cancel-autocommit (need !<(~ vase)))
%kiln-start-autoload (poke-start-autoload (need !<(~ vase)))
%kiln-merge (poke-merge (need !<(kiln-merge vase)))
%kiln-commit =;(f (f (need !<(_+<.f vase))) poke-commit)
%kiln-info =;(f (f (need !<(_+<.f vase))) poke-info)
%kiln-label =;(f (f (need !<(_+<.f vase))) poke-label)
%kiln-cancel =;(f (f (need !<(_+<.f vase))) poke-cancel)
%kiln-mount =;(f (f (need !<(_+<.f vase))) poke-mount)
%kiln-rm =;(f (f (need !<(_+<.f vase))) poke-rm)
%kiln-schedule =;(f (f (need !<(_+<.f vase))) poke-schedule)
%kiln-track =;(f (f (need !<(_+<.f vase))) poke-track)
%kiln-sync =;(f (f (need !<(_+<.f vase))) poke-sync)
%kiln-syncs =;(f (f (need !<(_+<.f vase))) poke-syncs)
%kiln-wipe-ford =;(f (f (need !<(_+<.f vase))) poke-wipe-ford)
%kiln-keep-ford =;(f (f (need !<(_+<.f vase))) poke-keep-ford)
%kiln-autoload =;(f (f (need !<(_+<.f vase))) poke-autoload)
%kiln-overload =;(f (f (need !<(_+<.f vase))) poke-overload)
%kiln-wash-gall =;(f (f (need !<(_+<.f vase))) poke-wash-gall)
%kiln-unmount =;(f (f (need !<(_+<.f vase))) poke-unmount)
%kiln-unsync =;(f (f (need !<(_+<.f vase))) poke-unsync)
%kiln-permission =;(f (f (need !<(_+<.f vase))) poke-permission)
%kiln-cancel-autocommit =;(f (f (need !<(_+<.f vase))) poke-cancel-autocommit)
%kiln-start-autoload =;(f (f (need !<(_+<.f vase))) poke-start-autoload)
%kiln-merge =;(f (f (need !<(_+<.f vase))) poke-merge)
==
::
++ autoload

8
pkg/arvo/lib/hood/write-mall.hoon
View File

@ -105,10 +105,10 @@
++ poke
|= [=mark =vase]
?+ mark ~|([%poke-write-bad-mark mark] !!)
%write-sec-atom (poke-sec-atom (need !<([host:eyre @] vase)))
%write-paste (poke-paste (need !<([?(%hoon %md %txt) @t] vase)))
%write-tree (poke-tree (need !<([path mime] vase)))
%write-wipe (poke-wipe (need !<(path vase)))
%write-sec-atom =;(f (f (need !<(_+<.f vase))) poke-sec-atom)
%write-paste =;(f (f (need !<(_+<.f vase))) poke-paste)
%write-tree =;(f (f (need !<(_+<.f vase))) poke-tree)
%write-wipe =;(f (f (need !<(_+<.f vase))) poke-wipe)
==
::
++ made