def stamped

bendvy-ecs-core@0.1.0.4 · bundle_component_install.bend:32

import Base
import world.bend as W
import component.bend as C
import column.bend as Col
import lifecycle.bend as L
import bundle_install.bend as F

32def stamped(~S:Data,~Store:Type,~R:Type,~E:Data,~Rest:Type,~C:Type,~V:Data,~Token:Data,~take:Store -> Rest & Col.Column<S,C>,~put:Rest -> Col.Column<S,C> -> Store,~project:C -> C & V,+family:C.Family<S,Store,Rest,C,V,Token,take,put,project>,+handle:W.Handle<S>,incoming:Maybe<&1,C>,observed:W.World<S,Store,R,E> & L.Stamp) -> F.Attempt<W.World<S,Store,R,E>,Entry<S,C>,Recovery<S,C>>:
33  (world,stamp)=observed
34  replaced(~S,~Store,~R,~E,~Rest,~C,~V,~Token,~take,~put,~project,handle,stamp,C.replace(~S,~Store,~R,~E,~Rest,~C,~V,~Token,~take,~put,~project,family,world,handle,incoming))