spider: fix mark validation

glob is succesfully downloaded and inserted into the docket state, but
as an octet stream. need to define the correct marks.
This commit is contained in:
ryjm 2021-09-27 02:43:34 -04:00
parent 035b29f0c0
commit 098587bf8b
2 changed files with 4 additions and 4 deletions

View File

@ -405,8 +405,8 @@
=: starting.state (~(put by starting.state) yarn [%build vase]) =: starting.state (~(put by starting.state) yarn [%build vase])
tid.state (~(put by tid.state) new-tid yarn) tid.state (~(put by tid.state) new-tid yarn)
serving.state serving.state
?. (~(has by serving.state) yrn) serving.state ?. (~(has by serving.state) new-tid) serving.state
(~(put by serving.state) yarn) (~(put by serving.state) new-tid [~ %noun q.beak])
== ==
=/ pax=path =/ pax=path
~| no-file-for-thread+file ~| no-file-for-thread+file
@ -476,7 +476,7 @@
^- (quip card ^state) ^- (quip card ^state)
=/ m (strand ,vase) =/ m (strand ,vase)
?. (has-yarn running.state yarn) ?. (has-yarn running.state yarn)
%- (slog leaf+"spider got input for non-existent {<yarn>} 2" ~) %- (slog leaf+"spider got input for non-existent {<yarn>}" ~)
`state `state
=/ =eval-form:eval:m =/ =eval-form:eval:m
thread-form:(need (get-yarn running.state yarn)) thread-form:(need (get-yarn running.state yarn))

View File

@ -138,7 +138,7 @@
=/ res (mule |.((vale.dais in))) =/ res (mule |.((vale.dais in)))
?: ?=(%| -.res) ?: ?=(%| -.res)
~|(%spider-mark-fail (mean leaf+"spider: ames vale fail {<mark>}" p.res)) ~|(%spider-mark-fail (mean leaf+"spider: ames vale fail {<mark>}" p.res))
p.res [mark p.res]
:: ::
:: Take a new sign and run the strand against it :: Take a new sign and run the strand against it
:: ::