gv_fetchpvn and gv_fetchpvn_flags are identical

[perl5.git] / regexp.h

diff --git a/regexp.h b/regexp.h
index 50a043c..5335061 100644 (file)
--- a/regexp.h
+++ b/regexp.h
@@ -152,12 +152,12 @@ typedef struct regexp {
 
     /*---------------------------------------------------------------------- */
 
+    char *subbeg;       /* saved or original string so \digit works forever. */
     SV_SAVED_COPY       /* If non-NULL, SV which is COW from original */
     SSize_t sublen;     /* Length of string pointed by subbeg */
     SSize_t suboffset;  /* byte offset of subbeg from logical start of str */
     SSize_t subcoffset; /* suboffset equiv, but in chars (for @-/@+) */
     SSize_t maxlen;  /* minimum possible number of chars in string to match */
-    char *subbeg;       /* saved or original string so \digit works forever. */
 
     /*---------------------------------------------------------------------- */
 
@@ -252,7 +252,7 @@ typedef struct regexp_engine {
 #define RXapif_REGNAMES_COUNT  0x1000
 
 /*
-=head1 REGEXP Functions
+=for apidoc_section REGEXP Functions
 
 =for apidoc Am|REGEXP *|SvRX|SV *sv
 
@@ -608,7 +608,7 @@ and check for NULL.
                                         the start pos (so s/.\G// would fail
                                         on second iteration */
 
-#if defined(__GNUC__) && !defined(PERL_GCC_BRACE_GROUPS_FORBIDDEN)
+#if defined(PERL_USE_GCC_BRACE_GROUPS)
 #  define ReREFCNT_inc(re)                                             \
     ({                                                                 \
        /* This is here to generate a casting warning if incorrect.  */ \
@@ -826,7 +826,7 @@ typedef struct regmatch_state {
        } keeper;
 
         /* quantifiers - these members are used for storing state for
-           for the regops used to implement quantifiers */
+           the regops used to implement quantifiers */
        struct {
            /* this first element must match u.yes */
            struct regmatch_state *prev_yes_state;