BundleComponentInstall.replaced: def of bendvy-ecs-core@0.1.0.4
Import: import bendvy-ecs-core@0.1.0.4/bundle_component_install.bend as BundleComponentInstall
Lines 28-31 of bendvy-ecs-core@0.1.0.4/bundle_component_install.bend: https://jend.leeeet.dev/read.txt?path=bendvy-ecs-core@0.1.0.4/bundle_component_install.bend&start_line=28&end_line=31

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

def replaced(~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,+handle:W.Handle<S>,+stamp:L.Stamp,result:C.Replacement<W.World<S,Store,R,E>,C>) -> F.Attempt<W.World<S,Store,R,E>,Entry<S,C>,Recovery<S,C>>:
  match result:
    case C.ReplaceRejected{world,incoming,error}: F.Refused{world,Entry{handle,incoming},error}
    case C.Replaced{world,previous}: F.Installed{world,w => undo(~S,~Store,~R,~E,~Rest,~C,~V,~Token,~take,~put,~project,Recovery{Entry{handle,previous},stamp},w)}

Uses (10):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Pair
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/bundle_component_install.bend&name=Entry
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/bundle_component_install.bend&name=Recovery
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/bundle_component_install.bend&name=undo
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/bundle_install.bend&name=Attempt
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/column.bend&name=Column
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/component.bend&name=Replacement
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/lifecycle.bend&name=Stamp
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/world.bend&name=Handle
  https://jend.leeeet.dev/definition.txt?path=bendvy-ecs-core@0.1.0.4/world.bend&name=World