Searched refs:CxTYPE (Results 1 - 7 of 7) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Ddeb.c202 (IV)ix, PL_block_type[CxTYPE(cx)]
205 if (CxTYPE(cx) == CXt_SUBST)
226 if (CxTYPE(cx) == CXt_SUBST)
260 if (CxTYPE(&(si_n->si_cxstack[i])) == CXt_SUBST)
H A Dpp_ctl.c1123 switch (CxTYPE(cx)) {
1131 context_name[CxTYPE(cx)], OP_NAME(PL_op));
1132 if (CxTYPE(cx) == CXt_NULL)
1206 switch (CxTYPE(cx)) {
1226 switch (CxTYPE(cx)) {
1244 switch (CxTYPE(cx)) {
1252 context_name[CxTYPE(cx)], OP_NAME(PL_op));
1253 if ((CxTYPE(cx)) == CXt_NULL)
1274 (long) cxstack_ix, PL_block_type[CxTYPE(cx)]));
1276 switch (CxTYPE(c
[all...]
H A Dcop.h341 (long)cxstack_ix, PL_block_type[CxTYPE(cx)]); )
354 (long)cxstack_ix+1,PL_block_type[CxTYPE(cx)]); )
448 #define CxTYPE(c) ((c)->cx_type & CXTYPEMASK) macro
H A Dscope.c1058 PerlIO_printf(Perl_debug_log, "CX %ld = %s\n", (long)(cx - cxstack), PL_block_type[CxTYPE(cx)]);
1059 if (CxTYPE(cx) != CXt_SUBST) {
1070 switch (CxTYPE(cx)) {
H A Ddump.c1501 if (CxTYPE(cx) == CXt_SUB || CxTYPE(cx) == CXt_FORMAT)
1503 else if (CxTYPE(cx) == CXt_EVAL && !CxTRYBLOCK(cx))
H A Dpp_hot.c1852 if (CxTYPE(cx) != CXt_LOOP)
H A Dsv.c10182 if (CxTYPE(cx) == CXt_SUBST) {
10193 switch (CxTYPE(cx)) {

Completed in 52 milliseconds