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,289dc5ca8f87113c
X-Google-NewGroupId: yes
X-Google-Attributes: gida07f3367d7,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news2.google.com!news4.google.com!feeder.news-service.com!newsfeed1.swip.net!newsfeed.arcor.de!newsspool2.arcor-online.net!news.arcor.de.POSTED!not-for-mail
Date: Sun, 05 Dec 2010 11:16:09 +0100
From: Georg Bauhaus <rm-host.bauhaus@maps.futureapps.de>
User-Agent: Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10.6; en-US;
 rv:1.9.2.13) Gecko/20101129 Thunderbird/3.1.7
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: accessibility of objects
References: <g96dnWSRONpxIGfRnZ2dnUVZ_o-dnZ2d@giganews.com>
In-Reply-To: <g96dnWSRONpxIGfRnZ2dnUVZ_o-dnZ2d@giganews.com>
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <4cfb6668$0$6881$9b4e6d93@newsspool2.arcor-online.net>
Organization: Arcor
NNTP-Posting-Date: 05 Dec 2010 11:16:08 CET
NNTP-Posting-Host: 46007e28.newsspool2.arcor-online.net
X-Trace: 
 DXC=mZ:EXI59Kb:nBOkdL^Lo7>A9EHlD;3Yc24Fo<]lROoR18kF<OcfhCO;HoKlEKF4YE?PCY\c7>ejV81B2>Hd:RKW>0_^dRkTSXB<
X-Complaints-To: usenet-abuse@arcor.de
Xref: g2news2.google.com comp.lang.ada:16785
Date: 2010-12-05T11:16:08+01:00
List-Id: <comp.lang.ada>

On 12/4/10 11:17 PM, george wrote:
> ... this first package need to store items/records that are defined in the calling package.
> "type extension at deeper accessibility level than parent" or something else problem.
> I just want this utility program to store essentially in old language a pointer to my object, and dont care about the structure of the object, and then return me the pointer att appropriate time.

A message like this may mean two things:

1. there is a derived type L defined local
to some subprogram.

2. an object of this local type L has been
allocated and is to be referred to from the
outside.

That is, some place more global, perhaps your package,
defines the ancestor type P of L. Maybe some type
of pointers to P'Class, too, say Ref.

If you'd to try to assign the local object to a
pointer of global type Ref then after the subprogram
has finished, the pointer would be pointing to an
object whose type no longer exists, since its type  (L)
was defined local to this subprogram.

In this case, you'd need to view convert the local object
of type L to an object of the ancestor type P (using a view
conversion) and then take its pointer.

(What software are you using for posting? NNTP
clients respect very long lines; this renders
quoting a bit difficult.)