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!news.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail From: Simon Wright Newsgroups: comp.lang.ada Subject: Re: GNAT GPL 2013 bug? Date: Fri, 09 Aug 2013 17:03:59 +0100 Organization: A noiseless patient Spider Message-ID: References: <19fr4wmxmen$.gjbias2fj461$.dlg@40tude.net> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: mx05.eternal-september.org; posting-host="ab63a21f76991e88ee5b3b5ea015b144"; logging-data="31270"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX18LhEmjfEpMHfKwz4MYdVubPplKZM1iWIM=" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3 (darwin) Cancel-Lock: sha1:l/BtuLda5kmvog9mxV4rx4Eow5E= sha1:IetY/Vhf+qQPJQPKAJ7VeNNZ7tc= Xref: news.eternal-september.org comp.lang.ada:16718 Date: 2013-08-09T17:03:59+01:00 List-Id: "Dmitry A. Kazakov" writes: > type Q is tagged null record; > procedure P (X : access Q) is null; > > Y : access Q := null; > begin > P (Y); -- This is not OK? dmitry.ada:9:07: warning: null value not allowed here dmitry.ada:9:07: warning: "Constraint_Error" will be raised at run time ... raised CONSTRAINT_ERROR : dmitry.ada:9 access check failed