-/* when context */
-struct block_when {
+/* given/when context */
+struct block_givwhen {
OP *leave_op;
+ SV *defsv_save; /* the original $_ */
};
struct block_format blku_format;
struct block_eval blku_eval;
struct block_loop blku_loop;
- struct block_when blku_when;
+ struct block_givwhen blku_givwhen;
} blk_u;
};
#define blk_oldsp cx_u.cx_blk.blku_oldsp
#define blk_format cx_u.cx_blk.blk_u.blku_format
#define blk_eval cx_u.cx_blk.blk_u.blku_eval
#define blk_loop cx_u.cx_blk.blk_u.blku_loop
-#define blk_when cx_u.cx_blk.blk_u.blku_when
+#define blk_givwhen cx_u.cx_blk.blk_u.blku_givwhen
#define CX_DEBUG(cx, action) \
DEBUG_l( \