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,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
Path: 
 eternal-september.org!reader01.eternal-september.org!feeder.eternal-september.org!news.unit0.net!fu-berlin.de!uni-berlin.de!individual.net!not-for-mail
From: hreba <f_hreba@yahoo.com.br>
Newsgroups: comp.lang.ada
Subject: Re: How can one record component be local and another not?
Date: Tue, 5 May 2020 14:55:01 +0200
Message-ID: <hhd615Ffg6mU1@mid.individual.net>
References: <hhcvilFe4qrU1@mid.individual.net>
 <ced03fe4-7d5d-454e-898b-6b98849e83a0@googlegroups.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 8bit
X-Trace: individual.net 84dFdq5gYUrrSk/bi29g5AeR787sdOUXC+p4bawn59yKD3i2xY
Cancel-Lock: sha1:tWK/RdfnV5siF0NsJmd74ODlD0Q=
User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:68.0) Gecko/20100101
 Thunderbird/68.7.0
In-Reply-To: <ced03fe4-7d5d-454e-898b-6b98849e83a0@googlegroups.com>
Content-Language: de-DE
Xref: reader01.eternal-september.org comp.lang.ada:58583
Date: 2020-05-05T14:55:01+02:00
List-Id: <comp.lang.ada>

On 5/5/20 1:43 PM, AdaMagica wrote:
> Das ganze Konstrukt sieht sehr gefährlich aus! Copies will not point to the correct component:
> 
> A, B: Rec;
> 
> A := B;  -- Peng!
> 

That is easy to solve: In my real application, Rec would be private 
anyway, so it could be made limited, and Init would be changed into a 
constructor function with result Rec. But first I wanted to solve (and 
understand) that local/non-local issue.

-- 
Frank Hrebabetzky, Kronach	+49 / 9261 / 950 0565