From: H.J. Lu <hjl.tools@gmail.com>
Date: Wed, 2 Jul 2025 00:51:47 +0000 (+0800)
Subject: check-function-bodies: Support "^[0-9]+:"
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3e34c54d72f6e3723601bcd936409af4a42d17b8;p=thirdparty%2Fgcc.git

check-function-bodies: Support "^[0-9]+:"

While working on

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=120936

I tried to use check-function-bodies to verify that label for mcount
and __fentry__ is only generated by "-pg" if it is used by __mcount_loc
section:

1:	call	mcount
	.section __mcount_loc, "a",@progbits
	.quad 1b
	.previous

Add "^[0-9]+:" to check-function-bodies to allow:

1:	call	mcount

	PR testsuite/120881
	* lib/scanasm.exp (check-function-bodies): Allow "^[0-9]+:".

Signed-off-by: H.J. Lu <hjl.tools@gmail.com>
---

diff --git a/gcc/testsuite/lib/scanasm.exp b/gcc/testsuite/lib/scanasm.exp
index 97935cb23c3..a2311de5704 100644
--- a/gcc/testsuite/lib/scanasm.exp
+++ b/gcc/testsuite/lib/scanasm.exp
@@ -1109,6 +1109,8 @@ proc check-function-bodies { args } {
 		append function_regexp ".*"
 	    } elseif { [regexp {^\.L} $line] } {
 		append function_regexp $line "\n"
+	    } elseif { [regexp {^[0-9]+:} $line] } {
+		append function_regexp $line "\n"
 	    } else {
 		append function_regexp $config(line_prefix) $line "\n"
 	    }