def snapshot

bendvy-ecs-core@0.1.0.4 · ordinary_app_schedule.bend:76

import Base
import ordinary_app_schema.bend as App
import ordinary_app_registration_fields.bend as Records
import ordinary_app_observation_data.bend as DTO
import world.bend as W

76# Return the retained application and an optional detached debug description.
77# Disabled debug yields None. Enabled observation describes the operational
78# plan without running it or consuming system lifecycle/event cursors.
79# Example: examples/scheduled-health/registration.bend uses ordinary-app-run.snapshot.
80def snapshot(~S:Data,~C:Type,~R:Type,~E:Data,~H:Type,~Rows:Data,~observe:W.World<S,C,R,E> -> W.World<S,C,R,E> & DTO.Observation<Rows>,~fold:H -> H & List<&2,Records.Fields<S>>,value:Application<S,C,R,E,H,Rows,observe,fold>) -> Application<S,C,R,E,H,Rows,observe,fold> & Maybe<&2,Description<S,Rows>>:
81  match value:
82    case Application{app,plan,namespace,name,steps,needs}:observed(~S,~C,~R,~E,~H,~Rows,~observe,~fold,plan,namespace,name,steps,needs,App.snapshot(~S,~C,~R,~E,~H,~Rows,~observe,~fold,app))