shrub/pkg/arvo/ted/build-mark.hoon

/-  spider
/+  strandio
=,  strand=strand:spider
^-  thread:spider
|=  arg=vase
=/  m  (strand ,vase)
^-  form:m
=+  !<([~ pax=path] arg)
?~  bem=(de-beam pax)
  (strand-fail:strand %path-not-beam >pax< ~)
=/  =mark  (rear s.u.bem)
;<  =dais:clay  bind:m  (build-mark:strandio -.u.bem mark)
(pure:m !>(dais))
-test, -build-file, -build-mark, -build-cast 2020-04-18 11:21:15 +03:00			`/- spider`
			`/+ strandio`
			`=, strand=strand:spider`
			`^- thread:spider`
			`\|= arg=vase`
			`=/ m (strand ,vase)`
			`^- form:m`
various: start threads with unit of tuple args Instead of a list of arguments, with trailing ~. 2020-12-02 01:38:02 +03:00			`=+ !<([~ pax=path] arg)`
zuse: removes en/de-beam (now in arvo) 2020-12-06 12:03:12 +03:00			`?~ bem=(de-beam pax)`
-build-{cast,file,mark}: accept full beams; load from any desk 2020-07-08 10:08:17 +03:00			`(strand-fail:strand %path-not-beam >pax< ~)`
zuse, clay, various: unflop the spur in beams Unflops the spur in +en-beam, +de-beam, and everything that calls either of those, or works with the consequences of their output. This includes clay's interface for mounting and unmounting, which now no longer expects the arguments to contain an old-style spur. 2020-11-24 04:20:36 +03:00			`=/ =mark (rear s.u.bem)`
-build-{cast,file,mark}: accept full beams; load from any desk 2020-07-08 10:08:17 +03:00			`;< =dais:clay bind:m (build-mark:strandio -.u.bem mark)`
-test, -build-file, -build-mark, -build-cast 2020-04-18 11:21:15 +03:00			`(pure:m !>(dais))`