* gnat.dg/case_null.adb, gnat.dg/specs/debug1.ads: Adjust tests.

From-SVN: r213303
This commit is contained in:
Arnaud Charlet 2014-07-30 18:05:46 +02:00
parent 72b4f1fc78
commit 3fa699d1d3
3 changed files with 7 additions and 2 deletions

View File

@ -1,3 +1,7 @@
2014-07-30 Arnaud Charlet <charlet@adacore.com>
* gnat.dg/case_null.adb, gnat.dg/specs/debug1.ads: Adjust tests.
2014-07-30 Tom Tromey <tromey@redhat.com>
PR c/59855
@ -7,6 +11,7 @@
* g++.dg/ipa/devirt-34.C: New testcase.
>>>>>>> .r213302
2014-07-28 Richard Biener <rguenther@suse.de>
PR rtl-optimization/61801

View File

@ -5,7 +5,7 @@ package body Case_Null is
procedure P1 (X : T) is
begin
case X is
when S1 =>
when S1 => -- { dg-error "not.*static" }
null;
when e =>
null;

View File

@ -11,4 +11,4 @@ package Debug1 is
end Debug1;
-- { dg-final { scan-assembler-times "DW_AT_artificial" 8 } }
-- { dg-final { scan-assembler-times "DW_AT_artificial" 13 } }