scanasm.exp (dg-function-on-line): Permit .fnstart to appear in the regexp pattern...

2010-09-22  Marcus Shawcroft  <marcus.shawcroft@arm.com>

	* lib/scanasm.exp(dg-function-on-line): Permit .fnstart to appear in
        the regexp pattern between the expected label and location string.

From-SVN: r164527

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index d6a4cae8c350de6ad6e8cc83f6f9216aa9c59f1f..98ee7436f88d2ba48fafff71f37e3fe03debee05 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2010-09-22  Marcus Shawcroft  <marcus.shawcroft@arm.com>
+
+       * lib/scanasm.exp(dg-function-on-line): Permit .fnstart to appear in
+        the regexp pattern between the expected label and location string.
+
 2010-09-22  Marcus Shawcroft  <marcus.shawcroft@arm.com>
 
        * gcc.dg/pr28706.c: Typo fix to dg-require-effective-target lto.

diff --git a/gcc/testsuite/lib/scanasm.exp b/gcc/testsuite/lib/scanasm.exp
index cf8f8a71642791ecda9f7561d542ceb58223734d..71ea415438553b3fae9fba993b913a9172e9f117 100644 (file)
--- a/gcc/testsuite/lib/scanasm.exp
+++ b/gcc/testsuite/lib/scanasm.exp
@@ -339,7 +339,7 @@ proc dg-function-on-line { args } {
        }
     }
 
-    set pattern [format {%s:[^\t]*(\t.(frame|mask|file)[^\t]*)*\t[^:]+:%d\n} \
+    set pattern [format {%s:[^\t]*(\t.(fnstart|frame|mask|file)[^\t]*)*\t[^:]+:%d\n} \
                  $symbol $line]
 
     # The lack of spaces around $pattern is important, since they'd