diff options
author | Nicholas Clark <nick@ccl4.org> | 2010-03-17 13:33:48 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2010-05-27 10:30:01 +0100 |
commit | f9ef50a71935a8e93b4030c12dcd1206ccab71ab (patch) | |
tree | eb3fd930cc49176fa359201be519a6563a343321 /regcomp.h | |
parent | f8abb37e5b952f76a9e019137369e3f8ef5a58ae (diff) | |
download | perl-f9ef50a71935a8e93b4030c12dcd1206ccab71ab.tar.gz |
Generate PL_simple[] and PL_varies[] with regcomp.pl, rather than hard-coding.
Add a new flags column to regcomp.sym, with V if the node type is in PL_varies,
S if it is in PL_simple, and . if a placeholder is needed because subsequent
optional columns are present.
Diffstat (limited to 'regcomp.h')
-rw-r--r-- | regcomp.h | 31 |
1 files changed, 0 insertions, 31 deletions
@@ -447,37 +447,6 @@ START_EXTERN_C #include "regnodes.h" #endif -/* The following have no fixed length. U8 so we can do strchr() on it. */ -#ifndef DOINIT -EXTCONST U8 PL_varies[]; -#else -EXTCONST U8 PL_varies[] = { - BRANCH, BACK, STAR, PLUS, CURLY, CURLYX, REF, REFF, REFFL, - WHILEM, CURLYM, CURLYN, BRANCHJ, IFTHEN, SUSPEND, CLUMP, - NREF, NREFF, NREFFL, - 0 -}; -#endif - -/* The following always have a length of 1. U8 we can do strchr() on it. */ -/* (Note that length 1 means "one character" under UTF8, not "one octet".) */ -#ifndef DOINIT -EXTCONST U8 PL_simple[]; -#else -EXTCONST U8 PL_simple[] = { - REG_ANY, SANY, CANY, - ANYOF, - ALNUM, ALNUML, - NALNUM, NALNUML, - SPACE, SPACEL, - NSPACE, NSPACEL, - DIGIT, NDIGIT, - VERTWS, NVERTWS, - HORIZWS, NHORIZWS, - 0 -}; -#endif - #ifndef PLUGGABLE_RE_EXTENSION #ifndef DOINIT EXTCONST regexp_engine PL_core_reg_engine; |