summaryrefslogtreecommitdiff
path: root/m17n-db/0001-fix-warnings-gawk.patch
blob: cf4e7551a05422b9094cc864167a7a3bc2f57915 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
From: Jesús E. <heckyel@hyperbola.info>
Date: Fri, 28 May 2021 04:29:00 +0100
Subject: Fix warning: regexp escape sequence `\#' is not a known regexp operator in gawk 5.0
---
diff --git a/CASE-MAPPING.awk b/CASE-MAPPING.awk
index cc64e61..36b6ca4 100644
--- a/CASE-MAPPING.awk
+++ b/CASE-MAPPING.awk
@@ -38,7 +38,7 @@ function mtext (str) {
   printf (" ");
 }
 
-/^[^\#]/ {
+/^[^#]/ {
   if (FILENAME == "UNIDATA/SpecialCasing.txt" && NF == 5) {
     printf ("0x%s ( ", $1);
     mtext($2);
diff --git a/CASED.awk b/CASED.awk
index 20fb6cd..9b0b25c 100644
--- a/CASED.awk
+++ b/CASED.awk
@@ -74,7 +74,7 @@ function range(str, bit) {
       cased[i] += bit;
 }
 
-/^[^\#]/ {
+/^[^#]/ {
   if (FILENAME == "UNIDATA/UnicodeData.txt") {
     if ($3 ~ /L[ltu]/)
       single($1, 1);
diff --git a/compact.awk b/compact.awk
index 19c4915..7e2a8da 100644
--- a/compact.awk
+++ b/compact.awk
@@ -63,7 +63,7 @@ function decode_hex(str, idx) {
   return n;
 }
 
-/^\#/ {
+/^#/ {
   print;
   next;
 }
diff --git a/gb180302.awk b/gb180302.awk
index a92a120..16a0ec1 100644
--- a/gb180302.awk
+++ b/gb180302.awk
@@ -70,7 +70,7 @@ function index_to_gb(idx) {
   return (b0 * 256 + b1);
 }
 
-/^\#/ {
+/^#/ {
   print;
   next;
 }
diff --git a/gb180304.awk b/gb180304.awk
index 55fff9d..cbd1efe 100644
--- a/gb180304.awk
+++ b/gb180304.awk
@@ -68,7 +68,7 @@ function index_to_gb(idx) {
   return sprintf("%02X%02X%02X%02X", b0, b1, b2, b3);
 }
 
-/^\#/ {
+/^#/ {
   print;
   next;
 }