[gcc r13-6115] contrib: Fix make_sunver.pl warning

[gcc r13-6115] contrib: Fix make_sunver.pl warning

[Rainer Orth]

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

commit r13-6115-gae2c1d0a9dc33f4c309a589d9f68fcd31206500e
Author: Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
Date:   Fri Feb 17 13:33:25 2023 +0100

    contrib: Fix make_sunver.pl warning
    
    Petr informed me that perl 5.32 bundled with Solaris 11.4 warns about
    make_sunver.pl:
    
    Unescaped left brace in regex is passed through in regex; marked by <-- HERE in m/^([ \t]*){ <-- HERE $/ at /vol/gcc/src/hg/master/local/libgomp/../contrib/make_sunver.pl line 216.
    
    I didn't notice since I'm using a common installation of perl 5.12
    across Solaris versions that doesn't show that warning.
    
    His patch fixes the issue.  Tested on Solaris 11.3 (perl 5.12) and 11.4
    (perl 5.32).
    
    2023-01-20  Petr Sumbera  <petr.sumbera@oracle.com>
    
            contrib:
            * make_sunver.pl: Escape brace.

Diff:
---
 contrib/make_sunver.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/contrib/make_sunver.pl b/contrib/make_sunver.pl
index 8a90b1fea0d..32e639ed873 100644
--- a/contrib/make_sunver.pl
+++ b/contrib/make_sunver.pl
@@ -213,7 +213,7 @@ while (<F>) {
     if (/^[ \t]*$/) { print; next; }
 
     # Lines of the form '{'
-    if (/^([ \t]*){$/) {
+    if (/^([ \t]*)\{$/) {
 	if ($in_extern) {
 	    print "$1##{\n";
 	} else {