Re: Watchdog-Timer Assignment

[Alex <henningssonalex@gmail.com>]

> This?
> 
>     Function Next_Second return Ada.Calendar.Time is
> 	Use Ada.Calendar;
> 	Now       : Time renames Clock;
> 	Second    : Duration renames Seconds(Now);
> 	Trunc     : Constant Natural  := Natural(Second);
> 	Rounded   : Constant Duration := Duration(Trunc);
> 	Year      : Year_Number;
> 	Month     : Month_Number;
> 	Day       : Day_Number;
> 	S         : Duration;
>     Begin
> 	Split(
>           Date    => Now,
>           Year    => Year,
>           Month   => Month,
>           Day     => Day,
>           Seconds => S
>          );
> 	return Time_Of(Year, Month, Day,
> 	  (if Rounded < Second
> 	   then Rounded + 1.0
> 	   else Rounded
> 	  ));
>     End Next_Second;

This I haven't seen! But that might work, I shall try. Even though I do not believe we had to do our own function, but that might work anyways. I will try. Thank you!