10 while ( op = (*op->op_ppaddr)() ) ;
17 warn("NULL OP IN RUN");
22 if (watchaddr != 0 && *watchaddr != watchok)
23 fprintf(stderr, "WARNING: %lx changed from %lx to %lx\n",
24 watchaddr, watchok, *watchaddr);
28 } while ( op = (*op->op_ppaddr)() );
37 return cxstack[cxstack_ix].blk_gimme;
45 deb("%s", op_name[op->op_type]);
46 switch (op->op_type) {
48 fprintf(stderr, "(%s)", SvPEEK(cSVOP->op_sv));
54 gv_fullname(sv, cGVOP->op_gv);
55 fprintf(stderr, "(%s)", SvPV(sv, na));
59 fprintf(stderr, "(NULL)");
62 fprintf(stderr, "\n");
72 fprintf(stderr, "WATCHING, %lx is currently %lx\n",