From 3fa699d1d32f6592c8f11ac285914aca865ec289 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Wed, 30 Jul 2014 18:05:46 +0200 Subject: [PATCH] * gnat.dg/case_null.adb, gnat.dg/specs/debug1.ads: Adjust tests. From-SVN: r213303 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gnat.dg/case_null.adb | 2 +- gcc/testsuite/gnat.dg/specs/debug1.ads | 2 +- 3 files changed, 7 insertions(+), 2 deletions(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index a334ad71f38..d0e5f261145 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2014-07-30 Arnaud Charlet + + * gnat.dg/case_null.adb, gnat.dg/specs/debug1.ads: Adjust tests. + 2014-07-30 Tom Tromey PR c/59855 @@ -7,6 +11,7 @@ * g++.dg/ipa/devirt-34.C: New testcase. +>>>>>>> .r213302 2014-07-28 Richard Biener PR rtl-optimization/61801 diff --git a/gcc/testsuite/gnat.dg/case_null.adb b/gcc/testsuite/gnat.dg/case_null.adb index eba89dc5f13..4b1b30ef7ce 100644 --- a/gcc/testsuite/gnat.dg/case_null.adb +++ b/gcc/testsuite/gnat.dg/case_null.adb @@ -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; diff --git a/gcc/testsuite/gnat.dg/specs/debug1.ads b/gcc/testsuite/gnat.dg/specs/debug1.ads index 2fdc6e13e91..1760eff739f 100644 --- a/gcc/testsuite/gnat.dg/specs/debug1.ads +++ b/gcc/testsuite/gnat.dg/specs/debug1.ads @@ -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 } }