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

hoon: refactors nock %11 in +mink

Browse Source
This commit is contained in:
Joe Bryan 2020-05-14 13:21:59 -07:00
parent e7d8a64a21
commit 56418b7ad7
1 changed files with 9 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
pkg/arvo/sys/hoon.hoon
View File

@ -6426,19 +6426,15 @@
[%11 [tag=@ clue=*] next=*]
=/ clue $(formula clue.formula)
?. ?=(%0 -.clue) clue
=; next
?. ?=(%0 -.next) next
:- %0
.* subject
[11 [tag.formula 1 product.clue] 1 product.next]
%= $
formula next.formula
trace ?. ?= ?(%hunk %hand %lose %mean %spot)
tag.formula
trace
:_ trace
[tag.formula product.clue]
==
=/ next
=? trace
?=(?(%hunk %hand %lose %mean %spot) tag.formula)
[[tag.formula product.clue] trace]
$(formula next.formula)
?. ?=(%0 -.next) next
:- %0
.* subject
[11 [tag.formula 1 product.clue] 1 product.next]
::
[%12 ref=* path=*]
=/ ref $(formula ref.formula)