mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-11-28 11:40:11 +03:00
zuse: remove superfluous 'scup' and 'culm' types
%zuse includes definitions for 'scup' and 'culm', both of which are superfluous. 'scup' is simply (pair ship desk) and is used only in the definition of 'culm', a tagged union in which three of the four branches are commented out (i.e. are unused). This commit deletes 'scup' and 'culm' and refactors what little code made use of them.
This commit is contained in:
parent
da2879073b
commit
1fe4ff1605
@ -1867,7 +1867,7 @@
|
||||
== ::
|
||||
++ task :: incoming request
|
||||
$~ [%vega ~] ::
|
||||
$% {$conf p/dock q/culm} :: configure app
|
||||
$% {$conf p/dock q/(pair ship desk)} :: configure app
|
||||
$>(%init vane-task) :: set owner
|
||||
{$deal p/sock q/cush} :: full transmission
|
||||
$>(%vega vane-task) :: report upgrade
|
||||
@ -1911,12 +1911,6 @@
|
||||
{$reap p/(unit tang)} :: peer result
|
||||
[%http-response =http-event:http] :: serve http result
|
||||
== ::
|
||||
++ culm :: config action
|
||||
$% {$load p/scup} :: load+reload
|
||||
:: {$kick ~} :: restart everything
|
||||
:: {$stop ~} :: toggle suspend
|
||||
:: {$wipe ~} :: destroy all state
|
||||
== ::
|
||||
++ cush (pair term club) :: internal task
|
||||
++ dude term :: server identity
|
||||
++ gill (pair ship term) :: general contact
|
||||
@ -1925,7 +1919,6 @@
|
||||
q/(map duct bone) :: by duct
|
||||
r/(map bone duct) :: by bone
|
||||
== ::
|
||||
++ scup (pair ship desk) :: autoupdate
|
||||
++ suss (trel dude @tas @da) :: config report
|
||||
++ well (pair desk term) ::
|
||||
-- ::gall
|
||||
|
Loading…
Reference in New Issue
Block a user