def retained

bendvy-ecs-core@0.1.0.4 · owned_event_storage.bend:39

import Base
import bendvy-ecs-core@0.1.0.4/owned_event_log.bend as Log

39def retained(~R:Type,~P:Type,resource:R,result:Log.Log<P> & List<Log.Row<P>>) -> Resources<R,P> & List<Log.Row<P>>:
40  match result:
41    case (log,retired):(Resources{resource,log},retired)