naive: add %failed for droppped l2 txs
::
=^ gud=? nas (try-apply nas i.pending)
=? valid gud [i.pending valid]
+ =? finding =(gud %.n)
+ %- ~(put by finding)
+ [(hash-raw-tx raw-tx.i.pending) %failed]
$(pending t.pending)
:: +try-apply:
::
