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=unavailable autolearn_force=no version=3.4.4
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!feeder.eternal-september.org!nntp-feed.chiark.greenend.org.uk!ewrotcd!newsfeed.xs3.de!io.xs3.de!news.jacob-sparre.dk!franka.jacob-sparre.dk!pnx.dk!.POSTED.rrsoftware.com!not-for-mail
From: "Randy Brukardt" <randy@rrsoftware.com>
Newsgroups: comp.lang.ada
Subject: Re: How to access an array using two different indexing schemes
Date: Wed, 29 Nov 2017 14:56:58 -0600
Organization: JSA Research & Innovation
Message-ID: <ovn6uq$rdm$1@franka.jacob-sparre.dk>
References: <d8c0ce45-97ad-4475-b3f9-1662a875a576@googlegroups.com>
 <e3a1f97e-7cbd-4327-aef6-c18ca9e74bc2@googlegroups.com>
 <ovidu5$eip$1@franka.jacob-sparre.dk>
 <ac428886-d567-4692-b8b7-22fcb69a755f@googlegroups.com>
 <0b6bd27e-e9ec-4854-bbb1-85e1d9ac92e1@googlegroups.com>
 <227d5a7f-6d5b-4b76-ac31-7d15bb6dc284@googlegroups.com>
Injection-Date: Wed, 29 Nov 2017 20:56:58 -0000 (UTC)
Injection-Info: franka.jacob-sparre.dk;
 posting-host="rrsoftware.com:24.196.82.226";
	logging-data="28086"; mail-complaints-to="news@jacob-sparre.dk"
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.5931
X-RFC2646: Format=Flowed; Original
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.7246
Xref: reader02.eternal-september.org comp.lang.ada:49264
Date: 2017-11-29T14:56:58-06:00
List-Id: <comp.lang.ada>

"AdaMagica" <christ-usch.grein@t-online.de> wrote in message 
news:227d5a7f-6d5b-4b76-ac31-7d15bb6dc284@googlegroups.com...
> Am Mittwoch, 29. November 2017 17:03:04 UTC+1 schrieb Shark8:
>
>> Procedure Do_Stuffs( Data : in out General_Real_Array ) is
>>   Subtype Indexing is General_Real_Array(1..Data'Length);
>>   Subtype Offset   is General_Real_Array(0..Integer'Pred(Data'Length));
>>
>>   Indexed  : Indexing renames Data;
>>   Offseted : Offset renames Data;
>
> No, that doesn't work! See previous posts.

Should have showed what does work:

  Indexed  : Indexing renames Indexing(Data);
  Offseted : Offset renames Offset(Data);

The type conversions change the bounds as needed. Renames does not allocate 
new memory.

                                     Randy.