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-Thread: 103376,7a3b1c6915ea1273
X-Google-NewGroupId: yes
X-Google-Attributes: gida07f3367d7,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Received: by 10.68.197.100 with SMTP id it4mr1247460pbc.5.1326469638790;
        Fri, 13 Jan 2012 07:47:18 -0800 (PST)
Path: 
 lh20ni177877pbb.0!nntp.google.com!news1.google.com!goblin3!goblin.stu.neva.ru!usenet.pasdenom.info!aioe.org!.POSTED!not-for-mail
From: "Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>
Newsgroups: comp.lang.ada
Subject: Re: How many Ada compiler bugs are here?
Date: Fri, 13 Jan 2012 16:46:58 +0100
Organization: cbb software GmbH
Message-ID: <11extopcf5hsy.qk7psu30kjrp.dlg@40tude.net>
References: <01dd6341-9c3c-4dcb-90f8-6ac66c65eb66@z1g2000vbx.googlegroups.com>
 <jentdh$4sd$1@munin.nbi.dk>
 <98adc34c-deed-4190-9e10-755cb886984f@n39g2000yqh.googlegroups.com>
 <r5zh8ht12meh$.wxldkm3c7893.dlg@40tude.net>
 <cb4706b1-0635-407f-9ed0-1e1d552ee279@n6g2000vbz.googlegroups.com>
 <5cm1d9xlavps$.1tjtc88r9ze21$.dlg@40tude.net>
 <6d352870-d204-4137-a562-5a0b67db1f80@h13g2000vbn.googlegroups.com>
 <15d37z3l8zllg$.3z2pj9cy5kvq.dlg@40tude.net>
 <7610c0ee-db98-4530-afab-f29e187ee7d0@h3g2000yqe.googlegroups.com>
 <1swdtf9umcv6h.1abrhg4hr4tdd$.dlg@40tude.net>
 <189376d3-eab5-44a2-a7fc-8a227d1f6d70@k10g2000yqk.googlegroups.com>
 <pwkna5x23gnb.1p9mw4p0c2uny$.dlg@40tude.net>
 <wccboq7d4md.fsf@shell01.TheWorld.com>
Reply-To: mailbox@dmitry-kazakov.de
NNTP-Posting-Host: FbOMkhMtVLVmu7IwBnt1tw.user.speranza.aioe.org
Mime-Version: 1.0
X-Complaints-To: abuse@aioe.org
User-Agent: 40tude_Dialog/2.0.15.1
X-Notice: Filtered by postfilter v. 0.8.2
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Date: 2012-01-13T16:46:58+01:00
List-Id: <comp.lang.ada>

On Fri, 13 Jan 2012 10:06:02 -0500, Robert A Duff wrote:

> Here's a workaround:
> 
>    function Foo return T is
>    begin
>       raise Constraint_Error;
>       return Foo; -- kludgy recursive call; can't get here!
>    end Foo;

Cool! I never thought about that. Thanks!
 
>> BTW, I always wondered why cannot we have multiple parents of a package in
>> Ada?
> 
> Sounds hugely complicated.

Why? The only complicated thing would naming of the files.

Instantiation of multiple parent's generic child must be fun, but no more
than generic child already is.

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de