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=-2.9 required=5.0 tests=BAYES_00,MAILING_LIST_MULTI
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,454c740d794a82d6,start
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-02-09 00:40:12 PST
Path: 
 supernews.google.com!sn-xit-02!supernews.com!isdnet!enst!enst.fr!not-for-mail
From: Christoph Grein <christoph.grein@eurocopter.de>
Newsgroups: comp.lang.ada
Subject: Adding Finalization (was: Re: controlled type in generic package?)
Date: Fri, 9 Feb 2001 09:31:21 +0100 (MET)
Organization: ENST, France
Sender: comp.lang.ada-admin@ada.eu.org
Message-ID: <mailman.981708009.26048.comp.lang.ada@ada.eu.org>
Reply-To: comp.lang.ada@ada.eu.org
NNTP-Posting-Host: marvin.enst.fr
Mime-Version: 1.0
Content-Type: TEXT/plain; charset=us-ascii
X-Trace: avanie.enst.fr 981708010 93324 137.194.161.2 (9 Feb 2001 08:40:10
 GMT)
X-Complaints-To: usenet@enst.fr
NNTP-Posting-Date: Fri, 9 Feb 2001 08:40:10 +0000 (UTC)
To: comp.lang.ada@ada.eu.org
Return-Path: <christoph.grein@eurocopter.de>
Content-MD5: fZNZUsVVMvYITuFROaB+3w==
X-Mailer: dtmail 1.2.1 CDE Version 1.2.1 SunOS 5.6 sun4u sparc 
Errors-To: comp.lang.ada-admin@ada.eu.org
X-BeenThere: comp.lang.ada@ada.eu.org
X-Mailman-Version: 2.0
Precedence: bulk
X-Reply-To: Christoph Grein <christoph.grein@eurocopter.de>
List-Help: <mailto:comp.lang.ada-request@ada.eu.org?subject=help>
List-Post: <mailto:comp.lang.ada@ada.eu.org>
List-Subscribe: <http://ada.eu.org/mailman/listinfo/comp.lang.ada>,
	<mailto: comp.lang.ada-request@ada.eu.org?subject=subscribe>
List-Id: comp.lang.ada mail<->news gateway <comp.lang.ada.ada.eu.org>
List-Unsubscribe: <http://ada.eu.org/mailman/listinfo/comp.lang.ada>,
	<mailto: comp.lang.ada-request@ada.eu.org?subject=unsubscribe>
List-Archive: <http://ada.eu.org/pipermail/comp.lang.ada/>
Errors-To: comp.lang.ada-admin@ada.eu.org
X-BeenThere: comp.lang.ada@ada.eu.org
Xref: supernews.google.com comp.lang.ada:5043
Date: 2001-02-09T09:31:21+01:00

If you want to add finalization (controlledness) in a later stage to a hierarchy 
of tagged types, please read my Ada Letters article "Add Finalization". It 
appeared IIRC in the delayed Dec 1999 edition, which appeared sometime beginning 
2000.

You can also find it on my homepage

  http://home.T-online.de/home/Christ-Usch.Grein/Ada/

The net result is: You can do this only for limited types. You enter hell for 
unlimited types.

To be clear: This is not about adding controlled components, but about making a 
derived type controlled, where the parent is uncontrolled.

Christoph Grein