[gcc/devel/omp/gcc-9] scanasm.exp (dg-function-on-line): Add pattern for hppa*-*-linux*.

Tobias Burnus burnus@gcc.gnu.org
Thu Mar 5 13:57:00 GMT 2020


https://gcc.gnu.org/g:d101a3765ae7162cfd107b74b275d63e52143d89

commit d101a3765ae7162cfd107b74b275d63e52143d89
Author: John David Anglin <danglin@gcc.gnu.org>
Date:   Fri Jun 7 23:22:15 2019 +0000

    scanasm.exp (dg-function-on-line): Add pattern for hppa*-*-linux*.
    
    	* lib/scanasm.exp (dg-function-on-line): Add pattern for hppa*-*-linux*.
    
    From-SVN: r272062

Diff:
---
 gcc/testsuite/ChangeLog       | 4 ++++
 gcc/testsuite/lib/scanasm.exp | 5 ++++-
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 9b909b3..f131f62 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2019-06-07  John David Anglin  <danglin@gcc.gnu.org>
+
+	* lib/scanasm.exp (dg-function-on-line): Add pattern for hppa*-*-linux*.
+
 2019-06-06  Richard Biener  <rguenther@suse.de>
 
 	Backport from mainline
diff --git a/gcc/testsuite/lib/scanasm.exp b/gcc/testsuite/lib/scanasm.exp
index cca6d64..35ccbc8 100644
--- a/gcc/testsuite/lib/scanasm.exp
+++ b/gcc/testsuite/lib/scanasm.exp
@@ -508,7 +508,10 @@ proc dg-function-on-line { args } {
 	}
     }
 
-    if { [istarget hppa*-*-*] } {
+    if { [istarget hppa*-*-linux*] } {
+	set pattern [format {%s:\n\t.PROC\n\t.CALLINFO.*\n\t.ENTRY\n.L.*:\n(\t.file[^\t]*)*\t[^:]+:%d(:[0-9]+)?\n} \
+                     $symbol $line]
+    } elseif { [istarget hppa*-*-*] } {
 	set pattern [format {\t;[^:]+:%d(:[0-9]+)?\n(\t[^\t]+\n)+%s:\n\t.PROC} \
                      $line $symbol]
     } elseif { [istarget mips*-*-*] } {



More information about the Gcc-cvs mailing list