Lines Matching refs:level
623 Perl_dump_indent(pTHX_ I32 level, PerlIO *file, const char* pat, ...)
628 dump_vindent(level, file, pat, &args);
633 Perl_dump_vindent(pTHX_ I32 level, PerlIO *file, const char* pat, va_list *args)
636 PerlIO_printf(file, "%*s", (int)(level*PL_dumpindent), "");
642 * for each indent level as appropriate.
649 * The start of a new op is signalled by passing a value for level which
650 * has been negated and offset by 1 (so that level 0 is passed as -1 and
657 * | FOO # level = 1, bar = 0b1
658 * | | # level =-2-1, bar = 0b11
660 * | BAZ # level = 2, bar = 0b10
664 S_opdump_indent(pTHX_ const OP *o, I32 level, UV bar, PerlIO *file,
669 bool newop = (level < 0);
677 level = -level - 1;
681 for (i = level-1; i >= 0; i--)
698 for (i = level-1; i >= 0; i--)
899 S_do_op_dump_bar(pTHX_ I32 level, UV bar, PerlIO *file, const OP *o);
903 S_do_pmop_dump_bar(pTHX_ I32 level, UV bar, PerlIO *file, const PMOP *pm)
914 S_opdump_indent(aTHX_ (OP*)pm, level, bar, file, "PMf_PRE %c%.*s%c\n",
918 S_opdump_indent(aTHX_ (OP*)pm, level, bar, file, "PMf_PRE (RUNTIME)\n");
922 S_opdump_indent(aTHX_ (OP*)pm, level, bar, file, "PMFLAGS = (%s)\n",
928 S_opdump_indent(aTHX_ (OP*)pm, level, bar, file,
933 S_opdump_indent(aTHX_ (OP*)pm, level, bar, file, "PMf_REPL =\n");
934 S_do_op_dump_bar(aTHX_ level + 2,
942 S_opdump_indent(aTHX_ (OP*)pm, level, bar, file, "CODE_LIST =\n");
943 S_do_op_dump_bar(aTHX_ level + 2,
948 S_opdump_indent(aTHX_ (OP*)pm, level, bar, file,
955 Perl_do_pmop_dump(pTHX_ I32 level, PerlIO *file, const PMOP *pm)
958 S_do_pmop_dump_bar(aTHX_ level, 0, file, pm);
1091 /* dump an op and any children. level indicates the initial indent.
1093 * For example if level == 5 and bar == 0b01101, then the indent prefix
1099 * For heavily nested output, the level may exceed the number of bits
1105 S_do_op_dump_bar(pTHX_ I32 level, UV bar, PerlIO *file, const OP *o)
1113 S_opdump_indent(aTHX_ o, -level-1, bar, file, "%s", OP_NAME(o));
1124 if (level == 0) {
1125 S_opdump_indent(aTHX_ o, level, bar, file, "PARENT");
1144 S_opdump_indent(aTHX_ o, level, bar, file,
1150 S_opdump_indent(aTHX_ o, level, bar, file, "TARG = %ld\n",
1175 S_opdump_indent(aTHX_ o, level, bar, file, "FLAGS = (%s)\n",
1259 S_opdump_indent(aTHX_ o, level, bar, file, "PRIVATE = (%s)\n",
1262 S_opdump_indent(aTHX_ o, level, bar, file,
1271 S_opdump_indent(aTHX_ o, level, bar, file,
1274 S_opdump_indent(aTHX_ o, level, bar, file,
1285 S_opdump_indent(aTHX_ o, level, bar, file, "ARGS = \n");
1287 S_opdump_indent(aTHX_ o, level+1, (bar << 1), file,
1294 S_opdump_indent(aTHX_ o, level, bar, file, "NARGS = %" IVdf "\n",
1298 S_opdump_indent(aTHX_ o, level, bar, file, "CONSTS = (%" SVf ")\n",
1311 S_opdump_indent(aTHX_ o, level, bar, file, "SV = %s\n",
1322 S_opdump_indent(aTHX_ o, level, bar, file, "LINE = %" LINE_Tf "\n",
1330 S_opdump_indent(aTHX_ o, level, bar, file, "PACKAGE = \"%s\"\n",
1341 S_opdump_indent(aTHX_ o, level, bar, file, "LABEL = \"%s\"\n",
1347 S_opdump_indent(aTHX_ o, level, bar, file, "HINTS = %08x\n",cCOPo->cop_hints);
1349 S_opdump_indent(aTHX_ o, level, bar, file, "FEATS = %08x\n",cCOPo->cop_features);
1351 S_opdump_indent(aTHX_ o, level, bar, file, "SEQ = %u\n",
1357 S_opdump_indent(aTHX_ o, level, bar, file, "REDO");
1359 S_opdump_indent(aTHX_ o, level, bar, file, "NEXT");
1361 S_opdump_indent(aTHX_ o, level, bar, file, "LAST");
1382 S_opdump_indent(aTHX_ o, level, bar, file, "OTHER");
1389 S_do_pmop_dump_bar(aTHX_ level, bar, file, cPMOPo);
1398 S_opdump_indent(aTHX_ o, level, bar, file,
1412 S_opdump_indent(aTHX_ o, level, bar, file,
1425 S_opdump_indent(aTHX_ o, level, bar, file,
1434 S_opdump_indent(aTHX_ o, level, bar, file,
1437 S_opdump_indent(aTHX_ o, level, bar, file,
1444 S_opdump_indent(aTHX_ o, level, bar, file,
1463 level++;
1466 S_do_op_dump_bar(aTHX_ level,
1474 Perl_do_op_dump(pTHX_ I32 level, PerlIO *file, const OP *o)
1476 S_do_op_dump_bar(aTHX_ level, 0, file, o);
1543 Perl_do_magic_dump(pTHX_ I32 level, PerlIO *file, const MAGIC *mg, I32 nest, I32 maxnest, bool dumpops, STRLEN pvlim)
1548 Perl_dump_indent(aTHX_ level, file,
1555 Perl_dump_indent(aTHX_ level, file, " MG_VIRTUAL = &PL_vtbl_%s\n", PL_magic_vtable_names[i]);
1558 Perl_dump_indent(aTHX_ level, file, " MG_VIRTUAL = 0x%"
1562 Perl_dump_indent(aTHX_ level, file, " MG_VIRTUAL = 0\n");
1565 Perl_dump_indent(aTHX_ level, file, " MG_PRIVATE = %d\n", mg->mg_private);
1577 Perl_dump_indent(aTHX_ level, file,
1580 Perl_dump_indent(aTHX_ level, file,
1585 Perl_dump_indent(aTHX_ level, file, " MG_FLAGS = 0x%02X\n", mg->mg_flags);
1588 Perl_dump_indent(aTHX_ level, file, " TAINTEDDIR\n");
1591 Perl_dump_indent(aTHX_ level, file, " MINMATCH\n");
1593 Perl_dump_indent(aTHX_ level, file, " REFCOUNTED\n");
1595 Perl_dump_indent(aTHX_ level, file, " GSKIP\n");
1597 Perl_dump_indent(aTHX_ level, file, " COPY\n");
1599 Perl_dump_indent(aTHX_ level, file, " DUP\n");
1601 Perl_dump_indent(aTHX_ level, file, " LOCAL\n");
1604 Perl_dump_indent(aTHX_ level, file, " BYTES\n");
1607 Perl_dump_indent(aTHX_ level, file, " MG_OBJ = 0x%" UVxf "\n",
1618 Perl_dump_indent(aTHX_ level+1, file, " PAT = %s\n", s);
1619 Perl_dump_indent(aTHX_ level+1, file, " REFCNT = %" IVdf "\n",
1623 do_sv_dump(level+2, file, mg->mg_obj, nest+1, maxnest, dumpops, pvlim); /* MG is already +1 */
1626 Perl_dump_indent(aTHX_ level, file, " MG_LEN = %ld\n", (long)mg->mg_len);
1628 Perl_dump_indent(aTHX_ level, file, " MG_PTR = 0x%" UVxf, PTR2UV(mg->mg_ptr));
1638 do_sv_dump(level+2, file, MUTABLE_SV(((mg)->mg_ptr)), nest+1,
1656 Perl_dump_indent(aTHX_ level, file,
1681 Perl_do_hv_dump(pTHX_ I32 level, PerlIO *file, const char *name, HV *sv)
1687 Perl_dump_indent(aTHX_ level, file, "%s = 0x%" UVxf, name, PTR2UV(sv));
1704 Perl_do_gv_dump(pTHX_ I32 level, PerlIO *file, const char *name, GV *sv)
1708 Perl_dump_indent(aTHX_ level, file, "%s = 0x%" UVxf, name, PTR2UV(sv));
1719 Perl_do_gvgv_dump(pTHX_ I32 level, PerlIO *file, const char *name, GV *sv)
1723 Perl_dump_indent(aTHX_ level, file, "%s = 0x%" UVxf, name, PTR2UV(sv));
1885 * level: amount to indent the output
1887 * nest: the current level of recursion
1888 * maxnest: the maximum allowed level of recursion
1894 Perl_do_sv_dump(pTHX_ I32 level, PerlIO *file, SV *sv, I32 nest, I32 maxnest, bool dumpops, STRLEN pvlim)
1904 Perl_dump_indent(aTHX_ level, file, "SV = 0\n");
1916 (int)(PL_dumpindent*level), "", (IV)SvREFCNT(sv),
1917 (int)(PL_dumpindent*level), "");
1986 Perl_dump_indent(aTHX_ level, file,
1996 Perl_dump_indent(aTHX_ level, file, "SV = ");
2020 Perl_dump_indent(aTHX_ level, file, " UV = %" UVuf, (UV)SvUVX(sv));
2022 Perl_dump_indent(aTHX_ level, file, " IV = %" IVdf, (IV)SvIVX(sv));
2031 Perl_dump_indent(aTHX_ level, file, " NV = %.*" NVgf "\n", NV_DECIMAL_DIG, SvNVX(sv));
2036 Perl_dump_indent(aTHX_ level, file, " RV = 0x%" UVxf "\n",
2039 do_sv_dump(level+1, file, SvRV(sv), nest+1, maxnest, dumpops, pvlim);
2056 Perl_dump_indent(aTHX_ level, file," OFFSET = %" UVuf "\n",
2061 Perl_dump_indent(aTHX_ level, file," PV = 0x%" UVxf " ",
2071 _invlist_dump(file, level, " ", sv);
2085 Perl_dump_indent(aTHX_ level, file, " CUR = %" IVdf "\n", (IV)SvCUR(sv));
2089 Perl_dump_indent(aTHX_ level, file, " REGEXP = 0x%" UVxf "\n",
2092 Perl_dump_indent(aTHX_ level, file, " LEN = %" IVdf "\n",
2096 Perl_dump_indent(aTHX_ level, file, " COW_REFCNT = %d\n",
2101 Perl_dump_indent(aTHX_ level, file, " PV = 0\n");
2106 do_magic_dump(level, file, SvMAGIC(sv), nest+1, maxnest, dumpops, pvlim);
2108 do_hv_dump(level, file, " STASH", SvSTASH(sv));
2111 Perl_dump_indent(aTHX_ level, file, " USEFUL = %" IVdf "\n",
2120 Perl_dump_indent(aTHX_ level, file, " ARRAY = 0x%" UVxf,
2125 Perl_dump_indent(aTHX_ level, file, " ALLOC = 0x%" UVxf "\n",
2130 Perl_dump_indent(aTHX_ level, file, " FILL = %" IVdf "\n",
2132 Perl_dump_indent(aTHX_ level, file, " MAX = %" IVdf "\n",
2137 Perl_dump_indent(aTHX_ level, file, " FLAGS = (%s)\n",
2147 Perl_dump_indent(aTHX_ level + 1, file, "Elt No. %" IVdf "\n",
2149 do_sv_dump(level+1, file, elt, nest+1, maxnest, dumpops, pvlim);
2157 Perl_dump_indent(aTHX_ level, file, " AUX_FLAGS = %" UVuf "\n",
2160 Perl_dump_indent(aTHX_ level, file, " ARRAY = 0x%" UVxf, PTR2UV(HvARRAY(sv)));
2214 Perl_dump_indent(aTHX_ level, file, " hash quality = %.1"
2218 Perl_dump_indent(aTHX_ level, file, " KEYS = %" IVdf "\n",
2234 Perl_dump_indent(aTHX_ level, file, " FILL = %" UVuf "\n",
2237 Perl_dump_indent(aTHX_ level, file, " MAX = %" IVdf "\n",
2240 Perl_dump_indent(aTHX_ level, file, " RITER = %" IVdf "\n",
2242 Perl_dump_indent(aTHX_ level, file, " EITER = 0x%" UVxf "\n",
2245 Perl_dump_indent(aTHX_ level, file, " RAND = 0x%" UVxf,
2257 Perl_dump_indent(aTHX_ level, file, " PMROOT = 0x%" UVxf "\n", PTR2UV(mg->mg_obj));
2264 Perl_dump_indent(aTHX_ level, file, " NAME = \"%s\"\n",
2275 level, file, " NAMECOUNT = %" IVdf "\n",
2300 level, file, " ENAME = %s\n", SvPV_nolen(names)+2
2307 level, file, " ENAME = \"%s\"\n",
2313 Perl_dump_indent(aTHX_ level, file, " BACKREFS = 0x%" UVxf "\n",
2315 do_sv_dump(level+1, file, MUTABLE_SV(backrefs), nest+1, maxnest,
2320 Perl_dump_indent(aTHX_ level, file, " MRO_WHICH = \"%s\" (0x%"
2326 Perl_dump_indent(aTHX_ level, file, " CACHE_GEN = 0x%"
2329 Perl_dump_indent(aTHX_ level, file, " PKG_GEN = 0x%" UVxf "\n",
2332 Perl_dump_indent(aTHX_ level, file, " MRO_LINEAR_ALL = 0x%"
2335 do_sv_dump(level+1, file, MUTABLE_SV(meta->mro_linear_all), nest+1, maxnest,
2339 Perl_dump_indent(aTHX_ level, file,
2342 do_sv_dump(level+1, file, MUTABLE_SV(meta->mro_linear_current), nest+1, maxnest,
2346 Perl_dump_indent(aTHX_ level, file,
2349 do_sv_dump(level+1, file, MUTABLE_SV(meta->mro_nextmethod), nest+1, maxnest,
2353 Perl_dump_indent(aTHX_ level, file, " ISA = 0x%" UVxf "\n",
2355 do_sv_dump(level+1, file, MUTABLE_SV(meta->isa), nest+1, maxnest,
2382 Perl_dump_indent(aTHX_ level+1, file, "Elt %s ", _pv_display_for_dump(d, keypv, len, 0, pvlim));
2394 do_sv_dump(level+1, file, elt, nest+1, maxnest, dumpops, pvlim);
2409 Perl_dump_indent(aTHX_ level, file, " AUTOLOAD = \"%s\"\n",
2415 Perl_dump_indent(aTHX_ level, file, " PROTOTYPE = \"%s\"\n",
2421 do_hv_dump(level, file, " COMP_STASH", CvSTASH(sv));
2425 Perl_dump_indent(aTHX_ level, file,
2429 Perl_dump_indent(aTHX_ level, file,
2434 Perl_dump_indent(aTHX_ level, file, " ROOT = 0x%" UVxf "\n",
2437 do_op_dump(level+1, file, CvROOT(sv));
2442 Perl_dump_indent(aTHX_ level, file, " XSUB = 0x%" UVxf "\n", PTR2UV(CvXSUB(sv)));
2445 Perl_dump_indent(aTHX_ level, file, " XSUBANY = 0x%" UVxf
2448 do_sv_dump(level+1, file, constant, nest+1, maxnest, dumpops,
2451 Perl_dump_indent(aTHX_ level, file, " XSUBANY = %" IVdf "\n",
2456 Perl_dump_indent(aTHX_ level, file, " NAME = \"%s\"\n",
2458 else do_gvgv_dump(level, file, " GVGV::GV", CvGV(sv));
2459 Perl_dump_indent(aTHX_ level, file, " FILE = \"%s\"\n", CvFILE(sv));
2460 Perl_dump_indent(aTHX_ level, file, " DEPTH = %"
2462 Perl_dump_indent(aTHX_ level, file, " FLAGS = 0x%" UVxf "\n",
2464 Perl_dump_indent(aTHX_ level, file, " OUTSIDE_SEQ = %" UVuf "\n", (UV)CvOUTSIDE_SEQ(sv));
2466 Perl_dump_indent(aTHX_ level, file, " PADLIST = 0x%" UVxf "\n", PTR2UV(CvPADLIST(sv)));
2468 do_dump_pad(level+1, file, CvPADLIST(sv), 0);
2472 Perl_dump_indent(aTHX_ level, file, " HSCXT = 0x%p\n", CvHSCXT(sv));
2475 Perl_dump_indent(aTHX_ level, file, " OUTSIDE = 0x%" UVxf " (%s)\n",
2491 do_sv_dump(level+1, file, MUTABLE_SV(CvOUTSIDE(sv)), nest+1, maxnest, dumpops, pvlim);
2497 Perl_dump_indent(aTHX_ level, file, " TYPE = %c\n", LvTYPE(sv));
2498 Perl_dump_indent(aTHX_ level, file, " TARGOFF = %" IVdf "\n", (IV)LvTARGOFF(sv));
2499 Perl_dump_indent(aTHX_ level, file, " TARGLEN = %" IVdf "\n", (IV)LvTARGLEN(sv));
2500 Perl_dump_indent(aTHX_ level, file, " TARG = 0x%" UVxf "\n", PTR2UV(LvTARG(sv)));
2501 Perl_dump_indent(aTHX_ level, file, " FLAGS = %" IVdf "\n", (IV)LvFLAGS(sv));
2503 do_sv_dump(level+1, file, LvTARG(sv), nest+1, maxnest,
2511 Perl_dump_indent(aTHX_ level, file, " NAME = \"%s\"\n",
2516 Perl_dump_indent(aTHX_ level, file, " NAMELEN = %" IVdf "\n", (IV)GvNAMELEN(sv));
2517 do_hv_dump (level, file, " GvSTASH", GvSTASH(sv));
2518 Perl_dump_indent(aTHX_ level, file, " FLAGS = 0x%" UVxf "\n", (UV)GvFLAGS(sv));
2519 Perl_dump_indent(aTHX_ level, file, " GP = 0x%" UVxf "\n", PTR2UV(GvGP(sv)));
2522 Perl_dump_indent(aTHX_ level, file, " SV = 0x%" UVxf "\n", PTR2UV(GvSV(sv)));
2523 Perl_dump_indent(aTHX_ level, file, " REFCNT = %" IVdf "\n", (IV)GvREFCNT(sv));
2524 Perl_dump_indent(aTHX_ level, file, " IO = 0x%" UVxf "\n", PTR2UV(GvIOp(sv)));
2525 Perl_dump_indent(aTHX_ level, file, " FORM = 0x%" UVxf " \n", PTR2UV(GvFORM(sv)));
2526 Perl_dump_indent(aTHX_ level, file, " AV = 0x%" UVxf "\n", PTR2UV(GvAV(sv)));
2527 Perl_dump_indent(aTHX_ level, file, " HV = 0x%" UVxf "\n", PTR2UV(GvHV(sv)));
2528 Perl_dump_indent(aTHX_ level, file, " CV = 0x%" UVxf "\n", PTR2UV(GvCV(sv)));
2529 Perl_dump_indent(aTHX_ level, file, " CVGEN = 0x%" UVxf "\n", (UV)GvCVGEN(sv));
2530 Perl_dump_indent(aTHX_ level, file, " GPFLAGS = 0x%" UVxf
2534 Perl_dump_indent(aTHX_ level, file, " LINE = %" LINE_Tf "\n", (line_t)GvLINE(sv));
2535 Perl_dump_indent(aTHX_ level, file, " FILE = \"%s\"\n", GvFILE(sv));
2536 do_gv_dump (level, file, " EGV", GvEGV(sv));
2539 Perl_dump_indent(aTHX_ level, file, " IFP = 0x%" UVxf "\n", PTR2UV(IoIFP(sv)));
2540 Perl_dump_indent(aTHX_ level, file, " OFP = 0x%" UVxf "\n", PTR2UV(IoOFP(sv)));
2541 Perl_dump_indent(aTHX_ level, file, " DIRP = 0x%" UVxf "\n", PTR2UV(IoDIRP(sv)));
2542 Perl_dump_indent(aTHX_ level, file, " LINES = %" IVdf "\n", (IV)IoLINES(sv));
2543 Perl_dump_indent(aTHX_ level, file, " PAGE = %" IVdf "\n", (IV)IoPAGE(sv));
2544 Perl_dump_indent(aTHX_ level, file, " PAGE_LEN = %" IVdf "\n", (IV)IoPAGE_LEN(sv));
2545 Perl_dump_indent(aTHX_ level, file, " LINES_LEFT = %" IVdf "\n", (IV)IoLINES_LEFT(sv));
2547 Perl_dump_indent(aTHX_ level, file, " TOP_NAME = \"%s\"\n", IoTOP_NAME(sv));
2549 do_gv_dump (level, file, " TOP_GV", IoTOP_GV(sv));
2551 Perl_dump_indent(aTHX_ level, file, " TOP_GV = 0x%" UVxf "\n",
2553 do_sv_dump (level+1, file, MUTABLE_SV(IoTOP_GV(sv)), nest+1,
2559 Perl_dump_indent(aTHX_ level, file, " FMT_NAME = \"%s\"\n", IoFMT_NAME(sv));
2561 do_gv_dump (level, file, " FMT_GV", IoFMT_GV(sv));
2563 Perl_dump_indent(aTHX_ level, file, " FMT_GV = 0x%" UVxf "\n",
2565 do_sv_dump (level+1, file, MUTABLE_SV(IoFMT_GV(sv)), nest+1,
2569 Perl_dump_indent(aTHX_ level, file, " BOTTOM_NAME = \"%s\"\n", IoBOTTOM_NAME(sv));
2571 do_gv_dump (level, file, " BOTTOM_GV", IoBOTTOM_GV(sv));
2573 Perl_dump_indent(aTHX_ level, file, " BOTTOM_GV = 0x%" UVxf "\n",
2575 do_sv_dump (level+1, file, MUTABLE_SV(IoBOTTOM_GV(sv)), nest+1,
2579 Perl_dump_indent(aTHX_ level, file, " TYPE = '%c'\n", IoTYPE(sv));
2581 Perl_dump_indent(aTHX_ level, file, " TYPE = '\\%o'\n", IoTYPE(sv));
2582 Perl_dump_indent(aTHX_ level, file, " FLAGS = 0x%" UVxf "\n", (UV)IoFLAGS(sv));
2598 Perl_dump_indent(aTHX_ level, file, " COMPFLAGS = 0x%" UVxf " (%s)\n",
2602 Perl_dump_indent(aTHX_ level, file, " EXTFLAGS = 0x%" UVxf " (%s)\n",
2605 Perl_dump_indent(aTHX_ level, file, " ENGINE = 0x%" UVxf " (%s)\n",
2609 Perl_dump_indent(aTHX_ level, file, " INTFLAGS = 0x%" UVxf " (%s)\n",
2612 Perl_dump_indent(aTHX_ level, file, " INTFLAGS = 0x%" UVxf "(Plug in)\n",
2616 Perl_dump_indent(aTHX_ level, file, " NPARENS = %" UVuf "\n",
2618 Perl_dump_indent(aTHX_ level, file, " LOGICAL_NPARENS = %" UVuf "\n",
2633 Perl_dump_indent(aTHX_ level, file, " LOGICAL_TO_PARNO = 0x%" UVxf "\n",
2637 Perl_dump_indent(aTHX_ level, file, " %" SVf, d);
2639 Perl_dump_indent(aTHX_ level, file, " PARNO_TO_LOGICAL = 0x%" UVxf "\n",
2643 Perl_dump_indent(aTHX_ level, file, " %" SVf, d);
2646 Perl_dump_indent(aTHX_ level, file, " PARNO_TO_LOGICAL_NEXT = 0x%" UVxf "\n",
2650 Perl_dump_indent(aTHX_ level, file, " %" SVf, d);
2654 Perl_dump_indent(aTHX_ level, file, " LASTPAREN = %" UVuf "\n",
2656 Perl_dump_indent(aTHX_ level, file, " LASTCLOSEPAREN = %" UVuf "\n",
2658 Perl_dump_indent(aTHX_ level, file, " MINLEN = %" IVdf "\n",
2660 Perl_dump_indent(aTHX_ level, file, " MINLENRET = %" IVdf "\n",
2662 Perl_dump_indent(aTHX_ level, file, " GOFS = %" UVuf "\n",
2664 Perl_dump_indent(aTHX_ level, file, " PRE_PREFIX = %" UVuf "\n",
2666 Perl_dump_indent(aTHX_ level, file, " SUBLEN = %" IVdf "\n",
2668 Perl_dump_indent(aTHX_ level, file, " SUBOFFSET = %" IVdf "\n",
2670 Perl_dump_indent(aTHX_ level, file, " SUBCOFFSET = %" IVdf "\n",
2673 Perl_dump_indent(aTHX_ level, file, " SUBBEG = 0x%" UVxf " %s\n",
2677 Perl_dump_indent(aTHX_ level, file, " SUBBEG = 0x0\n");
2678 Perl_dump_indent(aTHX_ level, file, " PAREN_NAMES = 0x%" UVxf "\n",
2680 Perl_dump_indent(aTHX_ level, file, " SUBSTRS = 0x%" UVxf "\n",
2682 Perl_dump_indent(aTHX_ level, file, " PPRIVATE = 0x%" UVxf "\n",
2684 Perl_dump_indent(aTHX_ level, file, " OFFS = 0x%" UVxf "\n",
2697 Perl_dump_indent(aTHX_ level, file, " %" SVf, d);
2699 Perl_dump_indent(aTHX_ level, file, " QR_ANONCV = 0x%" UVxf "\n",
2702 Perl_dump_indent(aTHX_ level, file, " SAVED_COPY = 0x%" UVxf "\n",
2706 Perl_dump_indent(aTHX_ level, file, " MOTHER_RE = 0x%" UVxf "\n",
2709 do_sv_dump(level+1, file, (SV *)RXp_MOTHER_RE(r), nest+1,
2714 Perl_dump_indent(aTHX_ level, file, " MAXFIELD = %" IVdf "\n",
2716 Perl_dump_indent(aTHX_ level, file, " FIELDS = 0x%" UVxf "\n",
2729 Perl_dump_indent(aTHX_ level + 1, file, "Field No. %" IVdf " (%s)\n",
2732 do_sv_dump(level+1, file, field, nest+1, maxnest, dumpops, pvlim);
2747 otherwise it will dump only the top level item, which
2827 DEBUG_l(Perl_deb(aTHX_ "Entering new RUNOPS level\n"));
2867 DEBUG_l(Perl_deb(aTHX_ "leaving RUNOPS level\n"));