Re: ada calendar
From: Nick Roberts (nick.roberts_at_acm.org)
Date: 12/06/03
- Previous message: Marius Amado Alves: "Re: ada calendar"
- In reply to: Stephen Leake: "Re: ada calendar"
- Next in thread: Reinert Korsnes: "Re: ada calendar"
- Reply: Reinert Korsnes: "Re: ada calendar"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: Sat, 06 Dec 2003 00:11:26 +0000
Stephen Leake wrote:
>>how can i add one week to clendar.time record using duration ?
>
> with Ada.Calendar; use Ada.Calendar;
> procedure One_Week
> is
> One_Minute : constant Duration := 60.0;
> One_Hour : constant Duration := 60 * One_Minute;
> One_Day : constant Duration := 24 * One_Hour;
> One_Week : constant Duration := 7 * One_Day;
>
> Now : Time := Clock;
> begin
> Now := Now + One_Week;
> end One_Week;
This may work on some implementations. If it fails, the compiler should
issue a fatal error. In this case, Tom Moran's suggestion:
One_Minute : constant Duration := 60.0;
One_Hour : constant Duration := 60 * One_Minute;
One_Day : constant Duration := 24 * One_Hour;
Now : Time := Clock;
begin
for Day in 1 .. 7 loop
Now := Now + One_Day;
end loop;
ought to work. There is a proposal to add this functionality in the next
revision of the language (AI-351).
-- Nick Roberts
- Previous message: Marius Amado Alves: "Re: ada calendar"
- In reply to: Stephen Leake: "Re: ada calendar"
- Next in thread: Reinert Korsnes: "Re: ada calendar"
- Reply: Reinert Korsnes: "Re: ada calendar"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|