diff -urp PadWalker-1.6-ab9MeI.orig/PadWalker.xs PadWalker-1.6-ab9MeI/PadWalker.xs --- PadWalker-1.6-ab9MeI.orig/PadWalker.xs 2008-01-14 09:58:48.000000000 +0100 +++ PadWalker-1.6-ab9MeI/PadWalker.xs 2008-01-30 03:40:28.000000000 +0100 @@ -319,8 +319,13 @@ do_peek(I32 uplevel, HV* my_hash, HV* ou cxtype_name(CxTYPE(&ccstack[i])), i)); switch (CxTYPE(&ccstack[i])) { case CXt_EVAL: +#if defined CxOLD_OP_TYPE + debug_print(("\told_op_type = %ld\n", CxOLD_OP_TYPE(&ccstack[i]))); + switch(CxOLD_OP_TYPE(&ccstack[i])) { +#else debug_print(("\told_op_type = %ld\n", ccstack[i].blk_eval.old_op_type)); switch(ccstack[i].blk_eval.old_op_type) { +#endif case OP_ENTEREVAL: if (first_eval) { context_vars(0, my_hash, our_hash, cop->cop_seq, ccstack[i].blk_eval.cv); @@ -435,7 +440,11 @@ up_cv(I32 uplevel, const char * caller_n for (i = cxix_from-1; i > cxix_to; --i) if (CxTYPE(&ccstack[i]) == CXt_EVAL) { +#if defined CxOLD_OP_TYPE + I32 old_op_type = CxOLD_OP_TYPE(&ccstack[i]); +#else I32 old_op_type = ccstack[i].blk_eval.old_op_type; +#endif if (old_op_type == OP_REQUIRE || old_op_type == OP_DOFILE) return ccstack[i].blk_eval.cv; } Only in PadWalker-1.6-ab9MeI/blib/arch/auto/PadWalker: PadWalker.bs Only in PadWalker-1.6-ab9MeI/blib/arch/auto/PadWalker: PadWalker.so Only in PadWalker-1.6-ab9MeI/blib/man3: PadWalker.3