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=unavailable autolearn_force=no version=3.4.4 Path: eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!.POSTED!not-for-mail From: "J-P. Rosen" Newsgroups: comp.lang.ada Subject: Re: How to get nice with GNAT? Date: Sun, 23 Nov 2014 17:18:51 +0100 Organization: A noiseless patient Spider Message-ID: References: Mime-Version: 1.0 Content-Type: text/plain; charset=windows-1252 Content-Transfer-Encoding: 8bit Injection-Date: Sun, 23 Nov 2014 16:18:40 +0000 (UTC) Injection-Info: mx02.eternal-september.org; posting-host="2b3884a634d8f846e0712b4e3a92507a"; logging-data="16392"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX1+ko+OlRMob7HDwQP1Y4MCW" User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:31.0) Gecko/20100101 Thunderbird/31.2.0 In-Reply-To: Cancel-Lock: sha1:OGNAkHZl2g6kg5ihF8DiZJ577M8= Xref: news.eternal-september.org comp.lang.ada:23662 Date: 2014-11-23T17:18:51+01:00 List-Id: Le 23/11/2014 17:13, brbarkstrom@gmail.com a écrit : > That is not correct. I routinely set OK := False; at the beginning > of the procedure and only set it to True when the procedure has completed > correctly. The output from the procedure does provide the last value > of OK before the procedure raises the exception -- if the procedure doesn't > handle the exception. RM 6.4.1(17). The language does not specify what happens to out parameters passed by copy in the case of an exception. It may work in some implementations, but it's not portable -- J-P. Rosen Adalog 2 rue du Docteur Lombard, 92441 Issy-les-Moulineaux CEDEX Tel: +33 1 45 29 21 52, Fax: +33 1 45 29 25 00 http://www.adalog.fr