def conditional_pending_generic

bendvy-ecs-core@0.1.0.3 · machine_queue.bend:13

import Base
import bendvy-ecs-core@0.1.0.3/machine.bend as M

13def conditional_pending_generic(-V:Data,same:V -> V -> Bool,pending:M.Pending<V>,+value:V) -> M.Pending<V>:
14  match pending:
15    case M.Queued{+prior,False{}}:forced_pending_generic(V,same(prior,value),prior,value)
16    case _:M.Queued{value,True{}}