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.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD,
	FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: 103376,1e36228aae0595da
X-Google-Attributes: gid103376,domainid0,public,usenet
X-Google-Language: ENGLISH,UTF8
Path: 
 g2news2.google.com!news1.google.com!news.glorb.com!feeder.erje.net!news.motzarella.org!motzarella.org!not-for-mail
From: =?UTF-8?B?UGF3ZcWCICdOaXZlcnRpdXMnIFDFgmF6aWXFhHNraQ==?=
 <nivertius@gmail.com>
Newsgroups: comp.lang.ada
Subject: Re: Access to function returning class-wide type
Date: Thu, 21 Aug 2008 12:33:07 +0200
Organization: A noiseless patient Spider
Message-ID: <g8jg93$e00$2@registered.motzarella.org>
References: <g8jf3n$e00$1@registered.motzarella.org>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8Bit
X-Trace: feeder.motzarella.org
 U2FsdGVkX19s0UWr01zr5GRgDgNSIWGlWNP4MbnlV2VIsaJ0yhRhUbJ1H7vuU9bgm9d71A66xlVWQErAWzlj0qIywON1qMAIWkBgRfTC46HGJErjz6q3HAIqay4oFQCmIz5uSJGF0owlJ6xy5mWJhw==
X-Complaints-To: Please send complaints to abuse@motzarella.org with full
 headers
NNTP-Posting-Date: Thu, 21 Aug 2008 10:33:08 +0000 (UTC)
X-Auth-Sender: U2FsdGVkX19om11mEybwvI1w0Atz1x38hSlq8YCmnDbp2d6pW9X0sg==
Cancel-Lock: sha1:LokuD1SK2rgawCLYh4AhlogLL1I=
User-Agent: KNode/0.10.9
Xref: g2news2.google.com comp.lang.ada:7447
Date: 2008-08-21T12:33:07+02:00
List-Id: <comp.lang.ada>

Little correction:

>         function Proc_Wrapper (N : Natural) return Abstracted'Class is
>         begin
>                 return Abstracted'Class'(Proc (N));
>         end Proc;

Proc_Wrapper should return Derived'(Proc(N)); to workaround to work, but it
doesn't really change the problem.

-- 
Paweł Płazieński aka Nivertius
"In the end, there will be Ada, XML and gzip"