1N/A#ifdef PERL_EXT_RE_BUILD
1N/A# ifndef PERL_IN_XSUB_RE
1N/A#ifdef PERL_IN_XSUB_RE
1N/A#ifndef PERL_IN_XSUB_RE
1N/A# if defined(BUGGY_MSC6)
1N/A#ifdef NO_UNARY_PLUS
1N/A Simple_vFAIL(m); \
1N/A for (i = 0; i < ANYOF_BITMAP_SIZE; i++)
1N/A for (i = 0; i < ANYOF_BITMAP_SIZE; i++)
1N/AS_cl_or(pTHX_ RExC_state_t *pRExC_state, struct regnode_charclass_class *cl, struct regnode_charclass_class *or_with)
1N/A for (i = 0; i < ANYOF_BITMAP_SIZE; i++)
1N/A for (i = 0; i < ANYOF_BITMAP_SIZE; i++)
1N/A for (i = 0; i < ANYOF_CLASSBITMAP_SIZE; i++)
1N/AS_study_chunk(pTHX_ RExC_state_t *pRExC_state, regnode **scanp, I32 *deltap, regnode *last, scan_data_t *data, U32 flags)
1N/A f = SCF_DO_STCLASS_AND;
1N/A f |= SCF_WHILEM_VISITED_POS;
1N/A struct regnode_charclass_class);
1N/A struct regnode_charclass_class);
1N/A l = utf8_length(s, s + l);
1N/A l = utf8_length(s, s + l);
1N/A goto optimize_curly_tail;
1N/A f |= SCF_DO_STCLASS_AND;
1N/A f &= ~SCF_DO_STCLASS_OR;
1N/A f &= ~SCF_WHILEM_VISITED_POS;
1N/A ? (f & ~SCF_DO_SUBSTR) : f);
1N/A struct regnode_charclass_class);
1N/A struct regnode_charclass_class);
1N/A#if defined(SPARC64_GCC_WORKAROUND)
1N/A b = pos_before;
1N/A goto do_default;
1N/A : SF_BEFORE_SEOL);
1N/A /* Lookahead/lookbehind */
1N/A f |= SCF_DO_STCLASS_AND;
1N/A f |= SCF_WHILEM_VISITED_POS;
1N/A if (f & SCF_DO_STCLASS_AND) {
1N/A RExC_sawback = 0;
1N/A RExC_seen_evals = 0;
1N/A RExC_extralen = 0;
1N/A RExC_naughty = 0;
1N/A RExC_whilem_seen = 0;
1N/A goto redo_first_pass;
1N/A RExC_extralen = 0;
1N/A RExC_naughty = 0;
1N/A : ROPT_ANCH_BOL));
1N/A if (!r->regstclass) {
1N/A stclass_flag = 0;
1N/A longest_float_length = 0;
1N/A longest_fixed_length = 0;
1N/A if (r->regstclass
1N/A && stclass_flag
1N/A struct regnode_charclass_class);
1N/A struct regnode_charclass_class);
1N/A minlen = study_chunk(pRExC_state, &scan, &fake, scan + RExC_size, &data, SCF_DO_STCLASS_AND|SCF_WHILEM_VISITED_POS);
1N/A struct regnode_charclass_class);
1N/A struct regnode_charclass_class);
1N/A RExC_parse++;
1N/A RExC_parse++;
1N/A RExC_parse++;
1N/A char *s = RExC_parse;
1N/A RExC_parse++;
1N/A RExC_parse++;
1N/A RExC_parse = s;
1N/A && IN_PERL_RUNTIME)
1N/A RExC_parse++;
1N/A --RExC_parse;
1N/A ++RExC_parse;
1N/A ++RExC_parse;
1N/A goto parse_flags;
1N/A RExC_parse++;
1N/A RExC_parse++;
1N/A if (have_branch) {
1N/A RExC_parse++;
1N/A RExC_parse--;
1N/A RExC_naughty++;
1N/A RExC_parse++;
1N/A goto nest_check;
1N/A RExC_parse++;
1N/A switch (*RExC_parse) {
1N/A if (*RExC_parse)
1N/A RExC_naughty++;
1N/A RExC_parse++;
1N/A RExC_parse++;
1N/A switch (*++RExC_parse) {
1N/A RExC_parse--;
1N/A RExC_parse--;
1N/A RExC_parse++;
1N/A RExC_parse--;
1N/A parse_start--;
1N/A RExC_parse++;
1N/A goto normal_default;
1N/A char* s = RExC_parse++;
1N/A RExC_parse++;
1N/A RExC_parse = s;
1N/A RExC_parse++;
1N/A RExC_parse = s;
1N/A return namedclass;
1N/A char *s = RExC_parse;
1N/A if (POSIXCC_NOTYET(c)) {
1N/A RExC_naughty++;
1N/A RExC_parse++;
1N/A goto charclassloop;
1N/A RExC_parse++;
1N/A if (e == RExC_parse)
1N/A n = e - RExC_parse;
1N/A e = RExC_parse;
1N/A RExC_parse++;
1N/A RExC_parse++;
1N/A case ANYOF_ALNUM:
1N/A case ANYOF_NALNUM:
1N/A case ANYOF_ALNUMC:
1N/A case ANYOF_NALNUMC:
1N/A case ANYOF_ALPHA:
1N/A case ANYOF_NALPHA:
1N/A case ANYOF_ASCII:
1N/A case ANYOF_NASCII:
1N/A case ANYOF_BLANK:
1N/A case ANYOF_NBLANK:
1N/A case ANYOF_CNTRL:
1N/A case ANYOF_NCNTRL:
1N/A case ANYOF_DIGIT:
1N/A case ANYOF_NDIGIT:
1N/A case ANYOF_GRAPH:
1N/A case ANYOF_NGRAPH:
1N/A case ANYOF_LOWER:
1N/A case ANYOF_NLOWER:
1N/A case ANYOF_PRINT:
1N/A case ANYOF_NPRINT:
1N/A case ANYOF_PSXSPC:
1N/A case ANYOF_NPSXSPC:
1N/A case ANYOF_PUNCT:
1N/A case ANYOF_NPUNCT:
1N/A case ANYOF_SPACE:
1N/A case ANYOF_NSPACE:
1N/A case ANYOF_UPPER:
1N/A case ANYOF_NUPPER:
1N/A case ANYOF_XDIGIT:
1N/A case ANYOF_NXDIGIT:
1N/A RExC_parse++;
1N/A if (!unicode_alternate)
1N/A literal_endpoint = 0;
1N/A if (need_class) {
1N/A RExC_parse++;
1N/A RExC_parse++;
1N/A RExC_parse++;
1N/A RExC_offsets[0]));
1N/A RExC_offsets[0]));
1N/A RExC_offsets[0]));
1N/A RExC_offsets[0]));
1N/A goto after_print;
1N/A if (r->anchored_substr)
1N/A else if (r->anchored_utf8)
1N/A if (r->float_substr)
1N/A else if (r->float_utf8)
1N/A if (r->regstclass) {
1N/A rangestart = i;
1N/A if (ANYOF_CLASS_TEST(o,i))
1N/A rangestart = i;
1N/A if (!PL_colorset)
1N/A if (RX_MATCH_COPIED(r))
1N/A if (r->anchored_substr)
1N/A if (r->anchored_utf8)
1N/A if (r->float_substr)
1N/A if (r->float_utf8)
1N/A if (p == &PL_regdummy)
1N/A PL_reg_start_tmp = 0;
1N/A PL_reg_start_tmpl = 0;
1N/A PL_reg_oldsavedlen = 0;
1N/A PL_reg_maxiter = 0;
1N/A PL_reg_leftiter = 0;
1N/A PL_reg_poscache_size = 0;