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

naive: l2 csv error handling for child threads

Browse Source 
use +mean instead of just a bare ~|
This commit is contained in:
drbeefsupreme 2022-04-06 11:50:44 -04:00
parent 76b195e4ce
commit a4250cbac0
No known key found for this signature in database
GPG Key ID: B70D5683DE7F9EFC
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
pkg/arvo/ted/naive-csv.hoon
View File

@ -118,7 +118,9 @@
=/ timestamps %- ~(gas by *(map blocknum @da))
?- tim
[%.y *] ;;((list [@ud @da]) q.p.tim)
[%.n *] ~| 'naive-csv: %eth-get-timestamps failed' !!
[%.n *]
=> (mean 'naive-csv: %eth-get-timestamps failed' p.tim)
!!
==
;< ~ bind:m (flog-text "naive-csv: got timestamps")
;< ~ bind:m (flog-text "naive-csv: getting tx receipts")
@ -128,7 +130,9 @@
=/ gas-sender %- ~(gas by *(map keccak [gas=@ud sender=address]))
?- gaz
[%.y *] (parse-gas-sender ;;((list [@t json]) q.p.gaz))
[%.n *] ~| 'naive-csv: %eth-get-tx-receipts failed' !!
[%.n *]
=> (mean 'naive-csv: %eth-tx-receipts failed' p.gaz)
!!
==
;< ~ bind:m (flog-text "naive-csv: got tx receipts")
=/ csv=(list cord)