Re: Designing Timers using Ada.Real_Time.Timing_Events package

["Anh Vo" <anhvofrcaus@gmail.com>]

 > Emulates a premature timer event. It could be a direct call to
Signal:
>
>    Signal (The_Event);

OK got it. It is used to notify on demand.

> It can be a procedure rather than entry, because Signal is a procedure.

I agree it should be a procedure.

> >       end Simulate;
> >
> >       procedure Signal (Event: in out
> > Real_Time.Timing_Events.Timing_Event) is
> >       begin
> >          Occurred := True;
> >          -- Action to be performed.
> >       end Signal;
> >
> >    end Periodic_Timer;
> >
> > end Dmitry_Timers;
>
> I cannot comment on Real_Time.Timing_Events, I have no any experience of
> using it...

I did not have much experience on Timing_Events until I read John
Barnes' Ada 2005 rationale. In addition, I gained more confidence after
compile and running it.

AV