* which may or may not check number of children).
*/
-typedef U16 PADOFFSET;
+typedef U32 PADOFFSET;
-#ifdef DEBUGGING
+#ifdef DEBUGGING_OPS
#define OPCODE opcode
#else
#define OPCODE U16
U8 op_flags; \
U8 op_private;
-#define GIMME (op->op_flags & OPf_KNOW ? op->op_flags & OPf_LIST : cxstack[cxstack_ix].blk_gimme & G_ARRAY)
+#define GIMME (op->op_flags & OPf_KNOW ? op->op_flags & OPf_LIST : dowantarray())
/* Public flags */
#define OPf_LIST 1 /* Do operator in list context. */
REGEXP * op_pmregexp; /* compiled expression */
SV * op_pmshort; /* for a fast bypass of execute() */
U16 op_pmflags;
+ U16 op_pmpermflags;
char op_pmslen;
};