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,5deaed13ab94dd56
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news4.google.com!news.glorb.com!atl-c08.usenetserver.com!news.usenetserver.com!pc02.usenetserver.com!ALLTEL.NET-a2kHrUvQQWlmc!not-for-mail
Date: Wed, 16 Nov 2005 07:37:01 -0600
From: "Marc A. Criley" <mcNOSPAM@mckae.com>
User-Agent: Mozilla Thunderbird 1.0 (Windows/20041206)
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Arrays & pointers question
References: <1132082934.714260.258260@g43g2000cwa.googlegroups.com>
   <ze-dnWZAyLBJoefeRVn-hQ@comcast.com>
   <1132086695.144045.188200@f14g2000cwb.googlegroups.com>
   <51d0b$437a4d29$49951d5$25049@ALLTEL.NET>
 <1132147139.374581.312370@g49g2000cwa.googlegroups.com>
In-Reply-To: <1132147139.374581.312370@g49g2000cwa.googlegroups.com>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <4a630$437b3602$4995321$22401@ALLTEL.NET>
X-Complaints-To: abuse@usenetserver.com
Organization: UseNetServer.com
X-Trace: 4a630437b3602a13cf68422401
Xref: g2news1.google.com comp.lang.ada:6429
Date: 2005-11-16T07:37:01-06:00
List-Id: <comp.lang.ada>

csaagpDIESPAMDIE@yahoo.com wrote:
> All objects of my array type have the same dimensions; not all objects
> fill out the same items.
> All of my array objects have the same 'first value, the same 'last
> value and the same 'range,
> but they all do not fill out their arrays to the 'last value.
> 

That's why Tom also mentioned slicing the array that you pass to your 
function:

Given:
    X2: MYTYPE(1 .. 20000);

<quote>
The declaration and call of Sort are unchanged.  Since the parameter to
Sort has bounds specified at run time, you also have the option of
sorting just a slice of a MYTYPE array, eg the first ten elements of X2:
    Sort(X2(1 .. 10));
or the last ten elements:
    Sort(X2(19991 .. 20000));
</quote>

Using 'Range in the Sort function properly handles both of these cases 
(and any other slices you need to use).  Take a look at the latter part 
of his posting again to see how this works.

-- Marc A. Criley
-- McKae Technologies
-- www.mckae.com
-- DTraq - XPath In Ada - XML EZ Out