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,ee1a8b8db84c88f
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,UTF8
Path: 
 g2news1.google.com!news1.google.com!proxad.net!213.200.89.82.MISMATCH!tiscali!newsfeed1.ip.tiscali.net!feed.news.tiscali.de!newsfeed.freenet.de!newsfeed.arcor.de!news.arcor.de!not-for-mail
Date: Thu, 18 Aug 2005 17:58:23 +0200
From: Georg Bauhaus <bauhaus@futureapps.de>
User-Agent: Debian Thunderbird 1.0.2 (X11/20050331)
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Ada exception block does NOT work?
References: <dds99e$qgn$1@netnews.hinet.net>
 <4301ab29$0$6989$9b4e6d93@newsread2.arcor-online.net>
 <ddsbsh$8hf$1@netnews.hinet.net>
 <1124185355.610972.22710@f14g2000cwb.googlegroups.com>
 <9AnMe.418$zb.194@trndny03> <87hddou95a.fsf@tiscali.be>
 <uvf24ztjf.fsf@no.email.thanks.invalid>
 <42LMe.31725$d5.185379@newsb.telia.net>
In-Reply-To: <42LMe.31725$d5.185379@newsb.telia.net>
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: quoted-printable
Message-ID: <4304b009$0$24157$9b4e6d93@newsread4.arcor-online.net>
Organization: Arcor
NNTP-Posting-Date: 18 Aug 2005 17:58:01 MEST
NNTP-Posting-Host: caacf00d.newsread4.arcor-online.net
X-Trace: 
 DXC=10i?7>cJjBLRG:gi]CKmZG:ejgIfPPldDjW\KbG]kaMHea\9g\;7NmE0Hehale2TKJhP3YJKgE\jL7IOQ^LcOZQF
X-Complaints-To: abuse@arcor.de
Xref: g2news1.google.com comp.lang.ada:4165
Date: 2005-08-18T17:58:01+02:00
List-Id: <comp.lang.ada>

Bj=C3=B6rn Persson wrote:
> This is starting to look very much like a Windows-specific bug.
>=20

$ gnatmake -v -gnato trading.adb

GNATMAKE 3.4.4 20050314 (prerelease) (Debian 3.4.3-13) Copyright 1995-200=
4 Free Software Foundation, Inc.
  "trading.ali" being checked ...
  -> "trading.ali" missing.
gcc-3.4 -c -gnato trading.adb
End of compilation
gnatbind -x trading.ali
gnatlink trading.ali

$ ./trading=20
average: 10.00
=2E..
average: 10.00
average:error here!
average:error here!
average:error here!
$

Same with GNATMAKE 4.0.1 20050609 (prerelease), and a GCC 4.1
snapshot.

AMD Duron, and PIIIs, Debian stable.