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-Thread: 103376,fe5e779eaf4ecf02
X-Google-Attributes: gid103376,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news1.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!local02.nntp.dca.giganews.com!nntp.telenor.com!news.telenor.com.POSTED!not-for-mail
NNTP-Posting-Date: Fri, 20 Jun 2008 14:48:20 -0500
From: Reinert Korsnes <a@b.no>
Subject: Re: How to loop (elegant) throug a vector ?
Newsgroups: comp.lang.ada
Date: Fri, 20 Jun 2008 21:48:20 +0200
References: <aMednZL3l638M8bV4p2dnAA@telenor.com>
 <SqT6k.162865$TT4.82100@attbi_s22>
User-Agent: KNode/0.10.4
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7Bit
Message-ID: <zrednVKHGcsZlMHVRVnzvQA@telenor.com>
X-Usenet-Provider: http://www.giganews.com
X-Trace: 
 sv3-hocPUUOGSrqx2GgbQRSoi1bd1aAjlncxuyvWAD+gBtwbDhqz/WQyXEnePgZoNRR6xw/ssdMNZlVHx1i!XIwZtaKVILkev5Xou1GGHtk3cvYKlqdqYEXvxQ9cLCCnkNtQhWmtkNsiZTTjshAdryMmIpI5sw==
X-Complaints-To: news-abuse@telenor.net
X-DMCA-Complaints-To: news-abuse@telenor.net
X-Abuse-and-DMCA-Info: Please be sure to forward a copy of ALL headers
X-Abuse-and-DMCA-Info: Otherwise we will be unable to process your complaint
 properly
X-Postfilter: 1.3.39
Xref: g2news1.google.com comp.lang.ada:790
Date: 2008-06-20T21:48:20+02:00
List-Id: <comp.lang.ada>

Jeffrey R. Carter wrote:

> Reinert Korsnes wrote:
>> 
>>    for k in 1 .. Positive(X.Length) loop
>>        do_something(X.Element(k));
>>    end loop;
>> 
>> Could anybody suggest improvements for the three
>> last lines in the code?
> 
> for K in 1 .. X.Last_Index loop
>     Do_Something (X.Element (K) );
> end loop;
> 
> Since the correct name for this package is Unbounded_Arrays, it makes
> sense to iterate over it in a manner to iterating over an array.
>

Maybe better:

for K in X.First_Index .. X.Last_Index loop
    Do_Something (X.Element (K) );
end loop;

?

Just in case someone in the future change the vector indexing type.
The first element need not correspond to index = 1.

reinert