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,b88fa8bfb1f50cc0,start X-Google-Attributes: gid103376,public X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news2.google.com!news2.google.com!news3.google.com!news.glorb.com!newsfeed-0.progon.net!progon.net!news-zh.switch.ch!switch.ch!cernne03.cern.ch!not-for-mail From: Maciej Sobczak Newsgroups: comp.lang.ada Subject: Controlled and funny GNAT warning Date: Mon, 22 Jan 2007 10:34:53 +0100 Organization: CERN News Message-ID: NNTP-Posting-Host: abpc10883.cern.ch Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-2; format=flowed Content-Transfer-Encoding: 7bit X-Trace: cernne03.cern.ch 1169458493 24796 137.138.37.241 (22 Jan 2007 09:34:53 GMT) X-Complaints-To: news@@cern.ch NNTP-Posting-Date: Mon, 22 Jan 2007 09:34:53 +0000 (UTC) User-Agent: Thunderbird 1.5.0.9 (X11/20061220) Xref: g2news2.google.com comp.lang.ada:8396 Date: 2007-01-22T10:34:53+01:00 List-Id: Hi, Consider: -- p.ads with Ada.Finalization; package P is type T is new Ada.Finalization.Controlled with null record; end P; Just specification. Let's compile it: $ gnatmake -gnatv -gnatwd -c p gnatgcc -c -gnatv -gnatwd p.ads GNAT GPL 2005 (20050729) Copyright 1992-2005 Free Software Foundation, Inc. Compiling: p.ads (source file time stamp: 2007-01-20 20:09:07) 3. type T is new Ada.Finalization.Controlled with null record; | >>> warning: implicit dereference 4 lines: No errors, 1 warning What's more funny, there is no problem with Limited_Controlled. Am I just unlucky while trying to learn Ada? :-) -- Maciej Sobczak : http://www.msobczak.com/ Programming : http://www.msobczak.com/prog/