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;
}
|