diff options
author | Karl Williamson <khw@cpan.org> | 2014-09-16 16:26:36 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2014-09-29 11:07:39 -0600 |
commit | 975a06f7f899d1dd89d8a66defc0b3ee41013d1f (patch) | |
tree | 523ad16df3478c4d86155fe55c3fe1c2f38bf768 | |
parent | 9da99c5e4f931efdaa065a5f0101b2b992a303ef (diff) | |
download | perl-975a06f7f899d1dd89d8a66defc0b3ee41013d1f.tar.gz |
regcomp.sym: ANYOF nodes have an argument
Plus a bitmap, but they always have an argument besides, contrary to
what was specified here. Future commits rely on this, whereas
heretofore this error was harmless.
-rw-r--r-- | pod/perldebguts.pod | 2 | ||||
-rw-r--r-- | regcomp.sym | 2 | ||||
-rw-r--r-- | regnodes.h | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/pod/perldebguts.pod b/pod/perldebguts.pod index 54644d7688..814949d6b7 100644 --- a/pod/perldebguts.pod +++ b/pod/perldebguts.pod @@ -591,7 +591,7 @@ will be lost. REG_ANY no Match any one character (except newline). SANY no Match any one character. CANY no Match any one byte. - ANYOF sv Match character in (or not in) this class, + ANYOF sv 1 Match character in (or not in) this class, single char match only # POSIX Character Classes: diff --git a/regcomp.sym b/regcomp.sym index 6908712a05..93019922da 100644 --- a/regcomp.sym +++ b/regcomp.sym @@ -57,7 +57,7 @@ NBOUNDA NBOUND, no ; Match "" at any word non-boundary using ASCI REG_ANY REG_ANY, no 0 S ; Match any one character (except newline). SANY REG_ANY, no 0 S ; Match any one character. CANY REG_ANY, no 0 S ; Match any one byte. -ANYOF ANYOF, sv 0 S ; Match character in (or not in) this class, single char match only +ANYOF ANYOF, sv 1 S ; Match character in (or not in) this class, single char match only #* POSIX Character Classes: # Order of the below is important. See ordering comment above. diff --git a/regnodes.h b/regnodes.h index ccec4d6a7d..3feb312f93 100644 --- a/regnodes.h +++ b/regnodes.h @@ -310,7 +310,7 @@ static const U8 regarglen[] = { 0, /* REG_ANY */ 0, /* SANY */ 0, /* CANY */ - 0, /* ANYOF */ + EXTRA_SIZE(struct regnode_1), /* ANYOF */ 0, /* POSIXD */ 0, /* POSIXL */ 0, /* POSIXU */ |