[gcc r15-1035] testsuite: Improve check-function-bodies

[Wilco Dijkstra via Gcc-cvs]

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

commit r15-1035-gacdc9df371fbe99e814a3f35a439531e08af79e7
Author: Wilco Dijkstra <wilco.dijks...@arm.com>
Date:   Wed Jun 5 14:05:59 2024 +0100

    testsuite: Improve check-function-bodies
    
    Improve check-function-bodies by allowing single-character function names.
    
    gcc/testsuite:
            * lib/scanasm.exp (configure_check-function-bodies): Allow 
single-char
            function names.

Diff:
---
 gcc/testsuite/lib/scanasm.exp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gcc/testsuite/lib/scanasm.exp b/gcc/testsuite/lib/scanasm.exp
index 6cf9997240d..42c719c512c 100644
--- a/gcc/testsuite/lib/scanasm.exp
+++ b/gcc/testsuite/lib/scanasm.exp
@@ -869,15 +869,15 @@ proc configure_check-function-bodies { config } {
     # Regexp for the start of a function definition (name in \1).
     if { [istarget nvptx*-*-*] } {
        set up_config(start) {
-           {^// BEGIN(?: GLOBAL|) FUNCTION DEF: ([a-zA-Z_]\S+)$}
+           {^// BEGIN(?: GLOBAL|) FUNCTION DEF: ([a-zA-Z_]\S*)$}
        }
     } elseif { [istarget *-*-darwin*] } {
        set up_config(start) {
-           {^_([a-zA-Z_]\S+):$}
+           {^_([a-zA-Z_]\S*):$}
            {^LFB[0-9]+:}
        }
     } else {
-       set up_config(start) {{^([a-zA-Z_]\S+):$}}
+       set up_config(start) {{^([a-zA-Z_]\S*):$}}
     }
 
     # Regexp for the end of a function definition.