This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Re: [Ada] pragma Warnings Off (str) should delete continuations
- From: Arnaud Charlet <charlet at adacore dot com>
- To: Eric Botcazou <ebotcazou at adacore dot com>
- Cc: gcc-patches at gcc dot gnu dot org, Robert Dewar <dewar at adacore dot com>
- Date: Wed, 23 Jun 2010 07:22:06 +0200
- Subject: Re: [Ada] pragma Warnings Off (str) should delete continuations
- References: <20100622173105.GA1161@adacore.com> <201006222055.25899.ebotcazou@adacore.com>
> > * errout.adb (Finalize): Set Prev pointers.
> > (Finalize): Delete continuations for deletion by warnings off(str).
> > * erroutc.ads: Add Prev pointer to error message structure.
>
> This apparently causes gnat.dg/not_null.adb to fail.
Indeed, I forgot to update this test case, now done.
--- not_null.adb (revision 161240)
+++ not_null.adb (working copy)
@@ -11,10 +11,8 @@ procedure not_null is
begin
declare
pragma Warnings (Off, "*null not allowed in null-excluding objects");
- pragma Warnings (Off, """Constraint_Error"" will be raised at run time");
package Inst_2 is new GPack (null);
pragma Warnings (On, "*null not allowed in null-excluding objects");
- pragma Warnings (On, """Constraint_Error"" will be raised at run time");
begin
null;
end;