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=-0.3 required=5.0 tests=BAYES_00,
	REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,f196003f7b36852b
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-04-25 10:00:17 PST
Path: 
 newsfeed.google.com!newsfeed.stanford.edu!canoe.uoregon.edu!logbridge.uoregon.edu!titan03.ksc.nasa.gov!niven.ksc.nasa.gov!usenet
From: "Stanley R. Allen" <u384k@gsde.hou.us.ray.com>
Newsgroups: comp.lang.ada
Subject: Re: Question about Finalization Control and reference counting
Date: Wed, 25 Apr 2001 11:57:19 -0500
Organization: NASA, Kennedy Space Center
Message-ID: <3AE701EF.7A80B0F3@gsde.hou.us.ray.com>
References: <slrn9e2vqb.aah.randhol+abuse@kiuk0156.chembio.ntnu.no>
 <slrn9e3072.aah.randhol+abuse@kiuk0156.chembio.ntnu.no>
 <3AE5A5B5.4337CE90@boeing.com>
Reply-To: Stanley_R_Allen-NR@raytheon.com
NNTP-Posting-Host: sstf-fw.jsc.nasa.gov
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Mailer: Mozilla 4.7 [en] (X11; U; IRIX64 6.2 IP19)
X-Accept-Language: en
Xref: newsfeed.google.com comp.lang.ada:6932
Date: 2001-04-25T11:57:19-05:00
List-Id: <comp.lang.ada>

Jeffrey Carter wrote:
> 
> type Node;
> type Node_Ptr is access all Node;
> type Node is new [Limited_]Controlled with record
>    [slice]
> procedure Adjust (Object : in out Node);

But.....

if it's derived from Limited_Controlled, the Adjust procedure
(though permitted) will never be 'automatically' invoked.

-- 
Stanley Allen
mailto:Stanley_R_Allen-NR@raytheon.com