}
if (code == IFTHEN && num < 2) /* Empty ELSE branch */
min1 = 0;
- if ((flags & (SCF_DO_SUBSTR | SCF_DO_STCLASS)) && !data)
- Perl_croak(aTHX_ "panic: null data in study_chunk");
if (flags & SCF_DO_SUBSTR) {
data->pos_min += min1;
data->pos_delta += max1 - min1;
dVAR;
#ifdef DEBUGGING
SV * const dsv = PERL_DEBUG_PAD_ZERO(0);
- SV * const re_debug_flags=get_sv(RE_DEBUG_FLAGS,0);
#endif
-
+ GET_RE_DEBUG_FLAGS_DECL;
if (!r || (--r->refcnt > 0))
return;