In perl.git, the branch blead has been updated <https://perl5.git.perl.org/perl.git/commitdiff/3ace85ea4f1777b7a1f1151aef632e45926bbbae?hp=8234439d1b57e10c5bbb0b024eeb325ea1a4b50a>
- Log ----------------------------------------------------------------- commit 3ace85ea4f1777b7a1f1151aef632e45926bbbae Author: Karl Williamson <[email protected]> Date: Sun Sep 15 16:08:13 2019 -0600 regcomp.sym: Fix comment The length of an EXACTish node is the same bits as the FLAGS field in other nodes; it doesn't "precede the length", as previously claimed. ----------------------------------------------------------------------- Summary of changes: pod/perldebguts.pod | 3 ++- regcomp.sym | 2 +- regnodes.h | 2 +- 3 files changed, 4 insertions(+), 3 deletions(-) diff --git a/pod/perldebguts.pod b/pod/perldebguts.pod index b9246893d2..b439380d8a 100644 --- a/pod/perldebguts.pod +++ b/pod/perldebguts.pod @@ -658,7 +658,8 @@ will be lost. # Literals - EXACT str Match this string (preceded by length). + EXACT str Match this string (flags field is the + length). EXACTL str Like EXACT, but /l is in effect (used so locale-related warnings can be checked for). diff --git a/regcomp.sym b/regcomp.sym index 522293c9c2..c69e4c9452 100644 --- a/regcomp.sym +++ b/regcomp.sym @@ -101,7 +101,7 @@ BRANCH BRANCH, node 0 V ; Match this alternative, or the next... #*Literals # NOTE: the relative ordering of these types is important do not change it -EXACT EXACT, str ; Match this string (preceded by length). +EXACT EXACT, str ; Match this string (flags field is the length). EXACTL EXACT, str ; Like EXACT, but /l is in effect (used so locale-related warnings can be checked for). EXACTF EXACT, str ; Match this string using /id rules (w/len); (string not UTF-8, not guaranteed to be folded). EXACTFL EXACT, str ; Match this string using /il rules (w/len); (string not guaranteed to be folded). diff --git a/regnodes.h b/regnodes.h index 211980ddcd..3b93b85aa2 100644 --- a/regnodes.h +++ b/regnodes.h @@ -48,7 +48,7 @@ #define NPOSIXA 34 /* 0x22 complement of POSIXA, [[:^class:]] */ #define CLUMP 35 /* 0x23 Match any extended grapheme cluster sequence */ #define BRANCH 36 /* 0x24 Match this alternative, or the next... */ -#define EXACT 37 /* 0x25 Match this string (preceded by length). */ +#define EXACT 37 /* 0x25 Match this string (flags field is the length). */ #define EXACTL 38 /* 0x26 Like EXACT, but /l is in effect (used so locale-related warnings can be checked for). */ #define EXACTF 39 /* 0x27 Match this string using /id rules (w/len); (string not UTF-8, not guaranteed to be folded). */ #define EXACTFL 40 /* 0x28 Match this string using /il rules (w/len); (string not guaranteed to be folded). */ -- Perl5 Master Repository
