regcomp.sym: Correct DIGITL, NDIGITL entries

These were missing that they were simple (matching exactly 1 character)
and have 0 regnode arguments

diff --git a/regcomp.sym b/regcomp.sym
index 42c0ee3..707da08 100644 (file)
--- a/regcomp.sym
+++ b/regcomp.sym
@@ -51,9 +51,9 @@ SPACEL      SPACE,      no 0 S    ; Match any whitespace char in locale
 NSPACE      NSPACE,     no 0 S    ; Match any non-whitespace character
 NSPACEL     NSPACE,     no 0 S    ; Match any non-whitespace char in locale
 DIGIT       DIGIT,      no 0 S    ; Match any numeric character
-DIGITL      DIGIT,      no        ; Match any numeric character in locale
+DIGITL      DIGIT,      no 0 S    ; Match any numeric character in locale
 NDIGIT      NDIGIT,     no 0 S    ; Match any non-numeric character
-NDIGITL     NDIGIT,     no        ; Match any non-numeric character in locale
+NDIGITL     NDIGIT,     no 0 S    ; Match any non-numeric character in locale
 CLUMP       CLUMP,      no 0 V    ; Match any extended grapheme cluster sequence
 
 #* Alternation

diff --git a/regnodes.h b/regnodes.h
index 55a89f1..35a4cc1 100644 (file)
--- a/regnodes.h
+++ b/regnodes.h
@@ -707,8 +707,8 @@ EXTCONST U8 PL_simple[] __attribute__deprecated__;
 #else
 EXTCONST U8 PL_simple[] __attribute__deprecated__ = {
     REG_ANY, SANY, CANY, ANYOF, ALNUM, ALNUML, NALNUM, NALNUML, SPACE,
-    SPACEL, NSPACE, NSPACEL, DIGIT, NDIGIT, VERTWS, NVERTWS, HORIZWS,
-    NHORIZWS,
+    SPACEL, NSPACE, NSPACEL, DIGIT, DIGITL, NDIGIT, NDIGITL, VERTWS,
+    NVERTWS, HORIZWS, NHORIZWS,
     0
 };
 #endif /* DOINIT */
@@ -717,7 +717,7 @@ EXTCONST U8 PL_simple[] __attribute__deprecated__ = {
 EXTCONST U8 PL_simple_bitmask[];
 #else
 EXTCONST U8 PL_simple_bitmask[] = {
-    0x00, 0xC0, 0xFF, 0x17, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x07
+    0x00, 0xC0, 0xFF, 0x3F, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x07
 };
 #endif /* DOINIT */