diff options
| author | danglin <danglin@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-12-09 14:43:03 +0000 |
|---|---|---|
| committer | danglin <danglin@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-12-09 14:43:03 +0000 |
| commit | 83464a81701c82f4185ae8ba9c77f1de407cdcda (patch) | |
| tree | 0936f3c24aacd1cd2e66a3be19a3a8076888c2ca /gcc/testsuite/lib/scanasm.exp | |
| parent | 570d39ec8d05a7cdbe319e356ebc52dbcd0055f7 (diff) | |
| download | gcc-83464a81701c82f4185ae8ba9c77f1de407cdcda.tar.gz | |
PR c++/44641
* lib/scanasm.exp (dg-function-on-line): Add match pattern for
hppa*-*-*.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@167638 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/lib/scanasm.exp')
| -rw-r--r-- | gcc/testsuite/lib/scanasm.exp | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/gcc/testsuite/lib/scanasm.exp b/gcc/testsuite/lib/scanasm.exp index 71ea4154385..66c522343f5 100644 --- a/gcc/testsuite/lib/scanasm.exp +++ b/gcc/testsuite/lib/scanasm.exp @@ -339,8 +339,13 @@ proc dg-function-on-line { args } { } } - set pattern [format {%s:[^\t]*(\t.(fnstart|frame|mask|file)[^\t]*)*\t[^:]+:%d\n} \ - $symbol $line] + if { [istarget "hppa*-*-*"] } { + set pattern [format {\t;[^:]+:%d\n(\t[^\t]+\n)+%s:\n\t.PROC} \ + $line $symbol] + } else { + 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 # become part of the regex scan-assembler tries to match. |