mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-27 06:42:14 -05:00
bb9dec546f
* gnu/packages/patches/libgpg-error-gawk-compat.patch: New file. * gnu/local.mk (dist_patch_DATA): Add it. * gnu/packages/gnupg.scm (libgpg-error)[source](modules, patches): New fields. * gnu/packages/gawk.scm (gawk): Update to 5.0.0.
155 lines
4.2 KiB
Diff
155 lines
4.2 KiB
Diff
From 7865041c77f4f7005282f10f9b6666b19072fbdf Mon Sep 17 00:00:00 2001
|
|
From: NIIBE Yutaka <gniibe@fsij.org>
|
|
Date: Mon, 15 Apr 2019 15:10:44 +0900
|
|
Subject: [PATCH] awk: Prepare for Gawk 5.0.
|
|
|
|
* src/Makefile.am: Use pkg_namespace (instead of namespace).
|
|
* src/mkerrnos.awk: Likewise.
|
|
* lang/cl/mkerrcodes.awk: Don't escape # in regexp.
|
|
* src/mkerrcodes.awk, src/mkerrcodes1.awk, src/mkerrcodes2.awk: Ditto.
|
|
|
|
--
|
|
|
|
In Gawk 5.0, regexp routines are replaced by Gnulib implementation,
|
|
which only allows escaping specific characters.
|
|
|
|
GnuPG-bug-id: 4459
|
|
Reported-by: Marius Schamschula
|
|
Signed-off-by: NIIBE Yutaka <gniibe@fsij.org>
|
|
---
|
|
lang/cl/mkerrcodes.awk | 2 +-
|
|
src/Makefile.am | 2 +-
|
|
src/mkerrcodes.awk | 2 +-
|
|
src/mkerrcodes1.awk | 2 +-
|
|
src/mkerrcodes2.awk | 2 +-
|
|
src/mkerrnos.awk | 2 +-
|
|
src/mkstrtable.awk | 10 +++++-----
|
|
7 files changed, 11 insertions(+), 11 deletions(-)
|
|
|
|
diff --git a/lang/cl/mkerrcodes.awk b/lang/cl/mkerrcodes.awk
|
|
index ae29043..9a1fc18 100644
|
|
--- a/lang/cl/mkerrcodes.awk
|
|
+++ b/lang/cl/mkerrcodes.awk
|
|
@@ -122,7 +122,7 @@ header {
|
|
}
|
|
|
|
!header {
|
|
- sub (/\#.+/, "");
|
|
+ sub (/#.+/, "");
|
|
sub (/[ ]+$/, ""); # Strip trailing space and tab characters.
|
|
|
|
if (/^$/)
|
|
diff --git a/src/Makefile.am b/src/Makefile.am
|
|
index ce1b882..f2590cb 100644
|
|
--- a/src/Makefile.am
|
|
+++ b/src/Makefile.am
|
|
@@ -293,7 +293,7 @@ code-from-errno.h: mkerrcodes$(EXEEXT_FOR_BUILD) Makefile
|
|
|
|
errnos-sym.h: Makefile mkstrtable.awk errnos.in
|
|
$(AWK) -f $(srcdir)/mkstrtable.awk -v textidx=2 -v nogettext=1 \
|
|
- -v prefix=GPG_ERR_ -v namespace=errnos_ \
|
|
+ -v prefix=GPG_ERR_ -v pkg_namespace=errnos_ \
|
|
$(srcdir)/errnos.in >$@
|
|
|
|
|
|
diff --git a/src/mkerrcodes.awk b/src/mkerrcodes.awk
|
|
index 46d436c..e9c857c 100644
|
|
--- a/src/mkerrcodes.awk
|
|
+++ b/src/mkerrcodes.awk
|
|
@@ -85,7 +85,7 @@ header {
|
|
}
|
|
|
|
!header {
|
|
- sub (/\#.+/, "");
|
|
+ sub (/#.+/, "");
|
|
sub (/[ ]+$/, ""); # Strip trailing space and tab characters.
|
|
|
|
if (/^$/)
|
|
diff --git a/src/mkerrcodes1.awk b/src/mkerrcodes1.awk
|
|
index a771a73..4578e29 100644
|
|
--- a/src/mkerrcodes1.awk
|
|
+++ b/src/mkerrcodes1.awk
|
|
@@ -81,7 +81,7 @@ header {
|
|
}
|
|
|
|
!header {
|
|
- sub (/\#.+/, "");
|
|
+ sub (/#.+/, "");
|
|
sub (/[ ]+$/, ""); # Strip trailing space and tab characters.
|
|
|
|
if (/^$/)
|
|
diff --git a/src/mkerrcodes2.awk b/src/mkerrcodes2.awk
|
|
index ea58503..188f7a4 100644
|
|
--- a/src/mkerrcodes2.awk
|
|
+++ b/src/mkerrcodes2.awk
|
|
@@ -91,7 +91,7 @@ header {
|
|
}
|
|
|
|
!header {
|
|
- sub (/\#.+/, "");
|
|
+ sub (/#.+/, "");
|
|
sub (/[ ]+$/, ""); # Strip trailing space and tab characters.
|
|
|
|
if (/^$/)
|
|
diff --git a/src/mkerrnos.awk b/src/mkerrnos.awk
|
|
index f79df66..15b1aad 100644
|
|
--- a/src/mkerrnos.awk
|
|
+++ b/src/mkerrnos.awk
|
|
@@ -83,7 +83,7 @@ header {
|
|
}
|
|
|
|
!header {
|
|
- sub (/\#.+/, "");
|
|
+ sub (/#.+/, "");
|
|
sub (/[ ]+$/, ""); # Strip trailing space and tab characters.
|
|
|
|
if (/^$/)
|
|
diff --git a/src/mkstrtable.awk b/src/mkstrtable.awk
|
|
index c9de9c1..285e45f 100644
|
|
--- a/src/mkstrtable.awk
|
|
+++ b/src/mkstrtable.awk
|
|
@@ -77,7 +77,7 @@
|
|
#
|
|
# The variable prefix can be used to prepend a string to each message.
|
|
#
|
|
-# The variable namespace can be used to prepend a string to each
|
|
+# The variable pkg_namespace can be used to prepend a string to each
|
|
# variable and macro name.
|
|
|
|
BEGIN {
|
|
@@ -102,7 +102,7 @@ header {
|
|
print "/* The purpose of this complex string table is to produce";
|
|
print " optimal code with a minimum of relocations. */";
|
|
print "";
|
|
- print "static const char " namespace "msgstr[] = ";
|
|
+ print "static const char " pkg_namespace "msgstr[] = ";
|
|
header = 0;
|
|
}
|
|
else
|
|
@@ -110,7 +110,7 @@ header {
|
|
}
|
|
|
|
!header {
|
|
- sub (/\#.+/, "");
|
|
+ sub (/#.+/, "");
|
|
sub (/[ ]+$/, ""); # Strip trailing space and tab characters.
|
|
|
|
if (/^$/)
|
|
@@ -150,7 +150,7 @@ END {
|
|
else
|
|
print " gettext_noop (\"" last_msgstr "\");";
|
|
print "";
|
|
- print "static const int " namespace "msgidx[] =";
|
|
+ print "static const int " pkg_namespace "msgidx[] =";
|
|
print " {";
|
|
for (i = 0; i < coded_msgs; i++)
|
|
print " " pos[i] ",";
|
|
@@ -158,7 +158,7 @@ END {
|
|
print " };";
|
|
print "";
|
|
print "static GPG_ERR_INLINE int";
|
|
- print namespace "msgidxof (int code)";
|
|
+ print pkg_namespace "msgidxof (int code)";
|
|
print "{";
|
|
print " return (0 ? 0";
|
|
|