comp.lang.ada
 help / color / mirror / Atom feed
From: Stephen Leake <stephen_leake@stephe-leake.org>
Subject: Re: Processing array subsections, a newbie question.
Date: Sun, 13 Jun 2010 21:45:09 -0400
Date: 2010-06-13T21:45:09-04:00	[thread overview]
Message-ID: <82wru2jska.fsf@stephe-leake.org> (raw)
In-Reply-To: m2fx0rxkfm.fsf@pushface.org

Simon Wright <simon@pushface.org> writes:

> Stephen Leake <stephen_leake@stephe-leake.org> writes:
>
>> "Peter C. Chapin" <pcc482719@gmail.com> writes:
>>
>>> procedure Do_Something
>>>    (Buffer : in  Buffer_Type;
>>>     Fst    : in  Natural;
>>>     Lst    : out Natural;
>>>     Ok     : out Boolean);
>>
>> Change this to:
>>
>> procedure Do_Something
>>    (Buffer : in     Buffer_Type;
>>     Last   : in out Natural;
>>     Ok     :    out Boolean);
>>
>> --  Operate on Buffer (Last + 1 ..), update Last to last item operated
>> --  on.
>
> What would happen if Buffer'First was Natural'First?

Good point. Last should be Integer, not Natural, so Last can be
initialized to Buffer'first - 1.

Which involves defining the type with an "extra" value, which Peter said
he didn't like. I find it quite useful in situations like this.

-- 
-- Stephe



  reply	other threads:[~2010-06-14  1:45 UTC|newest]

Thread overview: 28+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2010-06-12 19:11 Processing array subsections, a newbie question Peter C. Chapin
2010-06-12 19:38 ` Yannick Duchêne (Hibou57)
2010-06-12 19:41 ` Yannick Duchêne (Hibou57)
2010-06-12 20:54 ` Ludovic Brenta
2010-06-13  1:20   ` Gene
2010-06-13 14:01     ` Peter C. Chapin
2010-06-13 15:48       ` Yannick Duchêne (Hibou57)
2010-06-13 16:57       ` Phil Thornley
2010-06-13 18:39         ` Yannick Duchêne (Hibou57)
2010-06-13 19:04           ` Phil Thornley
2010-06-13 18:58         ` Peter C. Chapin
2010-06-13  6:28   ` Niklas Holsti
2010-06-13  6:54     ` Jeffrey R. Carter
2010-06-16 19:03       ` Niklas Holsti
2010-06-16 19:22       ` Ludovic Brenta
2010-06-13 14:09     ` Peter C. Chapin
2010-06-13 11:00 ` Stephen Leake
2010-06-13 11:04   ` Simon Wright
2010-06-14  1:45     ` Stephen Leake [this message]
2010-06-14 18:23 ` Colin Paul Gloster
2010-06-14 19:41   ` Simon Wright
2010-06-14 23:54     ` Peter C. Chapin
2010-06-15  3:28       ` Jeffrey R. Carter
2010-06-15  6:13       ` Simon Wright
2010-06-15 11:24         ` Peter C. Chapin
2010-06-15  9:45       ` Phil Thornley
2010-06-15 11:27         ` Peter C. Chapin
2010-06-15 12:11           ` Yannick Duchêne (Hibou57)
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox