This package holds the milestone pipe segment. Its only purpose is to notify the attached observers when it is called from the pipe.
An observer that observers a Milestone_Pipe_Segment
This Milestone_Pipe_Segement implementation tells the attached observers that it is called by the pipe.
private OpenCAGE.Controller.Pipe_Segments.Milestone.Milestone_Observers_Lists.List Observers
the observers to notify
private Ada.Strings.Unbounded.Unbounded_String Id
a unique identifier for the milestone pipe segment
Takes a Command object.
attach the given observer to the model
detach the given observer to the model
Notify the attached observers that the segment is reached.