From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,7dadb26e573572d
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-12-06 08:10:47 PST
Path: 
 archiver1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.frii.net!newsfeed.frii.net!140.99.99.194.MISMATCH!newsfeed1.easynews.com!easynews.com!easynews!bigfeed2.bellsouth.net!bigfeed.bellsouth.net!bignumb.bellsouth.net!news.bellsouth.net!bignews5.bellsouth.net.POSTED!not-for-mail
From: "David C. Hoos" <david.c.hoos.sr@ada95.com>
Newsgroups: comp.lang.ada
References: <4948f537.0312051300.d246254@posting.google.com>
Subject: Re: ada calendar
MIME-Version: 1.0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1158
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1165
Message-ID: <e9nAb.11218$mG.7425@bignews5.bellsouth.net>
X-Trace: 
 ldjgbllpbapjglppdbdpiflmbcekedmfhojhikkbagflhcbondboeodhhgbmdpenichhlkdhpcaebldpcijjobjlkjfenjlbebbdokmcigmdjfonbmenmefpnddofeakeinhoghiapgnlddekbplmeacnfkebomf
NNTP-Posting-Date: Sat, 06 Dec 2003 11:07:38 EST
Date: Sat, 6 Dec 2003 10:10:35 -0600
Xref: archiver1.google.com comp.lang.ada:3181
Date: 2003-12-06T10:10:35-06:00
List-Id: <comp.lang.ada>

with Ada.Calendar;
.
.
.
use type Ada.Calendar.Time; -- visibility to + operator
for d in 1 ..7 loop
   T := T + Day_Duration'Last;
end loop;



"shoko" <shoko2004@hotmail.com> wrote in message
news:4948f537.0312051300.d246254@posting.google.com...
> hi
> how can i add one week to clendar.time record using duration ?