* gnat.dg/not_null.adb: Update test case.
From-SVN: r161241
This commit is contained in:
parent
c00ccd0131
commit
8d66b22ae2
@ -1,3 +1,7 @@
|
||||
2010-06-23 Arnaud Charlet <charlet@adacore.com>
|
||||
|
||||
* gnat.dg/not_null.adb: Update test case.
|
||||
|
||||
2010-06-22 Jakub Jelinek <jakub@redhat.com>
|
||||
|
||||
PR c++/44619
|
||||
|
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user