develooper Front page | perl.perl5.changes | Postings from September 2019

[perl.git] branch blead updated. v5.31.3-185-g3ace85ea4f

From:
Karl Williamson
Date:
September 15, 2019 22:14
Subject:
[perl.git] branch blead updated. v5.31.3-185-g3ace85ea4f
Message ID:
E1i9cmt-0000OE-65@git.dc.perl.space
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 <khw@cpan.org>
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



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About