urbit/ares
1
1
Fork 0
mirror of https://github.com/urbit/ares.git synced 2024-12-22 12:51:42 +03:00
Code Issues Packages Projects Releases Wiki Activity

pull generator don't print result, debug hints only

Browse Source
This commit is contained in:
Edward Amsden 2022-02-14 23:20:18 -06:00
parent 4bbb786861
commit e86a4fe0f0
No known key found for this signature in database
GPG Key ID: 548EDF608CA956F6
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
subject-knowledge/gen/pull.hoon
View File

@ -1,3 +1,3 @@
/+ subject-knowledge
|= [s=sock:subject-knowledge f=*]
-:(pull:subject-knowledge bord:subject-knowledge s f)
~:(pull:subject-knowledge bord:subject-knowledge s f)

6
subject-knowledge/lib/subject-knowledge.hoon
View File

@ -398,14 +398,14 @@
:: memo miss
=. memo (~(put by memo) [s k.f] `(unit sock)`~) :: blackhole for recursive eval
=^ res memo ^$(s s, f k.f)
~& "Miss: {<[s k.f]>}"
~& "Miss: sock {<s>} formula {<k.f>}"
[[%mis res] (~(put by memo) [s k.f] `(unit sock)``r.res)] :: fill in result
?~ u.mem
:: memo blackhole
~& "Recur: {<[s k.f]>}"
~& "Recur: sock {<[s]>} formula {<k.f>}"
[[%rec s k.f] memo]
:: memo hit
~& "Hit: {<[s k.f]>}"
~& "Hit: sock {<[s]>} formula {<k.f>} result {<u.u.mem>}"
[[%hit u.u.mem] memo]
?+ f ~| %pull-bonk !!
::