From: vries <vries@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Mon, 18 Apr 2016 08:53:41 +0000 (+0000)
Subject: Add dot-file scans to pr70161.c
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=67ccbf39a27290f655dbdffe89560f45f2f806dc;p=thirdparty%2Fgcc.git

Add dot-file scans to pr70161.c

2016-04-18  Tom de Vries  <tom@codesourcery.com>

	PR testsuite/70699
	* gcc.dg/pr70161.c: Add dot-file scans.
	* lib/scandump.exp (dump-suffix): Return suffix after first dot char,
	instead of after last dot char.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@235095 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 8f16407c5d69..582d5873937f 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2016-04-18  Tom de Vries  <tom@codesourcery.com>
+
+	PR testsuite/70699
+	* gcc.dg/pr70161.c: Add dot-file scans.
+	* lib/scandump.exp (dump-suffix): Return suffix after first dot char,
+	instead of after last dot char.
+
 2016-04-17  Eric Botcazou  <ebotcazou@adacore.com>
 
 	* c-c++-common/dump-ada-spec-3.c: New test.
diff --git a/gcc/testsuite/gcc.dg/pr70161.c b/gcc/testsuite/gcc.dg/pr70161.c
index 0b173c7ee9d4..9b77d90b8081 100644
--- a/gcc/testsuite/gcc.dg/pr70161.c
+++ b/gcc/testsuite/gcc.dg/pr70161.c
@@ -5,3 +5,6 @@ void
 foo (void)
 {
 }
+
+/* { dg-final { scan-ipa-dump-times "subgraph" 1 "inline.dot" } } */
+/* { dg-final { scan-ipa-dump-times "subgraph" 1 "cp.dot" } } */
diff --git a/gcc/testsuite/lib/scandump.exp b/gcc/testsuite/lib/scandump.exp
index 74d27cc32ec2..89b3944c71b3 100644
--- a/gcc/testsuite/lib/scandump.exp
+++ b/gcc/testsuite/lib/scandump.exp
@@ -22,7 +22,7 @@
 # Extract the constant part of the dump file suffix from the regexp.
 # Argument 0 is the regular expression.
 proc dump-suffix { arg } {
-    set idx [expr [string last "." $arg] + 1]
+    set idx [expr [string first "." $arg] + 1]
     return [string range $arg $idx end]
 }