ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2025-01-03 04:40:50 +03:00
Code Issues Packages Projects Releases Wiki Activity

spider: move imps to /imp

Browse Source
This commit is contained in:
Philip Monk 2019-09-26 12:13:01 -07:00
parent 957aa99d9f
commit 7dcce421e7
No known key found for this signature in database
GPG Key ID: B66E1F02604E44EC
3 changed files with 14 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkg/arvo/age/spider.hoon
View File

@ -25,7 +25,7 @@
=^ cards state
?+ mark (handle-poke:def mark vase)
%spider-imput (handle-poke-imput:sc !<(imput vase))
%spider-start (handle-start-imp:sc !<([imp-name path] vase))
%spider-start (handle-start-imp:sc !<([imp-name term] vase))
==
[cards this]
::
@ -55,14 +55,13 @@
(take-input imp-name ~ %sign wire sign-arvo)
::
++ handle-start-imp
|= [=imp-name =path]
|= [=imp-name =term]
^- (quip card ^state)
?: (~(has by state) imp-name)
~| [%already-started imp-name]
!!
=/ =card
=/ =beam (need (de-beam:format path))
=/ =schematic:ford [%core [p q]:beam hoon+s.beam]
=/ =schematic:ford [%core [our.bowl %home] /hoon/[term]/imp]
[%pass /build/[imp-name] %arvo %f %build live=%.y schematic]
[[card ~] state]
::

4
pkg/arvo/gen/spider/start.hoon
View File

@ -1,3 +1,3 @@
:- %say
|= [* [=term =path ~] ~]
[%spider-start term path]
|= [* [name=term where=term ~] ~]
[%spider-start name where]

9
pkg/arvo/imp/first.hoon Normal file
View File

@ -0,0 +1,9 @@
/- spider
/+ threadio
=, thread=thread:spider
^- imp:spider
|= bowl:mall
=/ m (thread ,~)
^- form:m
;< ~ bind:m echo:threadio
(pure:m ~)