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,FREEMAIL_FROM autolearn=ham autolearn_force=no version=3.4.4 X-Google-Thread: 103376,11c630572e59f461 X-Google-Attributes: gid103376,public X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news2.google.com!news2.google.com!fu-berlin.de!uni-berlin.de!individual.net!not-for-mail From: "Alex R. Mosteo" Newsgroups: comp.lang.ada Subject: Re: Bug in GNAT GPL 2006? Date: Thu, 22 Feb 2007 11:52:35 +0100 Message-ID: <545av3F1ukgfpU1@mid.individual.net> References: Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7Bit X-Trace: individual.net 0EdFfu+BDIwuLnBS4c7woACbbZIf47qG4hNC81ACn/8zdG3/s= User-Agent: KNode/0.10.4 Xref: g2news2.google.com comp.lang.ada:9402 Date: 2007-02-22T11:52:35+01:00 List-Id: (see below) wrote: > Using GNAT GPL 2006 (20060522-34) I get warning messages > like the following when using extended return statements: > > function is_empty (the_table : a_safe_table) return Boolean is > begin > return result : Boolean do > | > >>> warning: variable "result" is assigned but never read > > lock_table; > result := is_empty(a_basic_table(the_table)); > unlock_table; > end return; > end is_empty; > > I'm inclined to assume that this is a compiler bug, but can > anyone more knowledgeable about Ada 200[57] confirm this? It was my impression that extended return wasn't completely finished. Did you get that to work, despite the warning?