def event_param

bendvy-ecs-core@0.1.0.4 · ordinary_reader_stream_parameter.bend:266

import Base
import bendvy-ecs-core@0.1.0.4/reader_parameter.bend as RP
import bendvy-ecs-core@0.1.0.4/event_stream.bend as Stream
import bendvy-ecs-core@0.1.0.4/event_family_routing.bend as Route
import bendvy-ecs-core@0.1.0.4/event_notice_runtime.bend as Mixed
import bendvy-ecs-core@0.1.0.4/relation_commands.bend as Notice
import bendvy-ecs-core@0.1.0.4/ordinary_event_declaration.bend as Event

266def event_param(~S:Data,~C:Type,~R:Type,~P:Data,~E:Data,~F:Type,~H:Type,
267  ~take:F -> F & Stream.Stream<S,E>,
268  ~put:F -> Stream.Stream<S,E> -> F,
269  ~declaration:Event.Declaration<S,E>) -> RP.Param<Route.Runtime<S,C,R,Notice.Notice<S,P>,Mixed.State<S,P,F,H>>,EventOwner<S,C,R,P,E,F,H,take,put>,EventView<S,E>,Nat,
270  validate_event(~S,~C,~R,~P,~E,~F,~H,~take,~put,~declaration),prepare_event(~S,~C,~R,~P,~E,~F,~H,~take,~put,~declaration),commit_event(~S,~C,~R,~P,~E,~F,~H,~take,~put),release_event(~S,~C,~R,~P,~E,~F,~H,~take,~put)>:
271  RP.make(~Route.Runtime<S,C,R,Notice.Notice<S,P>,Mixed.State<S,P,F,H>>,~EventOwner<S,C,R,P,E,F,H,take,put>,~EventView<S,E>,~Nat,
272    ~validate_event(~S,~C,~R,~P,~E,~F,~H,~take,~put,~declaration),
273    ~prepare_event(~S,~C,~R,~P,~E,~F,~H,~take,~put,~declaration),
274    ~commit_event(~S,~C,~R,~P,~E,~F,~H,~take,~put),
275    ~release_event(~S,~C,~R,~P,~E,~F,~H,~take,~put),
276    event_access(~S,~E,declaration))