def step.revived

bend-kit-runner@0.13.0.1 · runner.bend:254

import Base
import bend-kit-scheduler@0.4.1.0/queue.bend as Q
import bend-kit-collections@0.1.4.1/heap.bend as H
import bend-kit-collections@0.1.4.1/omap.bend as O

254# The revived ticket keeps its payload and takes id i, the key it was dead under.
255def step.revived(~A: Data, m: Maybe<&2, Dead<A>>, +i: Nat, n: Nat, h: H.Heap<Q.Ticket<A>>, r: List<&2, Q.Ticket<A>>, ts: Tries(), ds: Graves(A), bs: Breakers(), +d: Nat) -> State<A>:
256  match m:
257    case None{}:
258      State{Q.State{n, h, r}, ts, ds, bs}
259    case Some{Dead{Q.Ticket{k, old, x}, w, at}}:
260      State{Q.State{n, H.Heap.push(~Q.Ticket<A>, ~(a => b => Q.le(A, a, b)), Q.Ticket{i, d, x}, h), r}, O.OMap.put(~Nat, ~Try, ~Nat.cmp, ts, i, Try{0n, d}), ds, bs}