def install

bendvy-ecs-core@0.1.0.4 · bundle_install.bend:37

import Base
import bundle_pack.bend as B

37def install(~World:Type,~H:Type,~HQ:Type,~Tail:Type,~TQ:Type,~installHead:World -> H -> Attempt<World,H,HQ>,~installTail:World -> Tail -> Attempt<World,Tail,TQ>,world:World,payload:B.Pack<H,Tail>) -> Attempt<World,B.Pack<H,Tail>,Recovery<World,H,HQ,Tail,TQ>>:
38  match payload:
39    case B.Pack{head,tail}: installed_head(~World,~H,~HQ,~Tail,~TQ,~installTail,installHead(world,head),tail)