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).
Committed to trunk.
Rainer
--
-----------------------------------------------------------------------------
Rainer Orth, Center for Biotechnology, Bielefeld University
2023-01-20 Petr Sumbera <[email protected]>
contrib:
* make_sunver.pl: Escape brace.
# HG changeset patch
# Parent a9c533b97d6828dce4fa8418864a1fa65f5c46b3
contrib: Fix make_sunver.pl warning
diff --git a/contrib/make_sunver.pl b/contrib/make_sunver.pl
--- 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 {
