diff options
author | Father Chrysostomos <sprout@cpan.org> | 2013-10-23 19:33:50 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2013-10-23 19:33:50 -0700 |
commit | 4c3ed7418bcf4eae5235fb7bcae842820725bea8 (patch) | |
tree | 3edb2ddaa777c11e2051622e23ae2f1af124553e /dump.c | |
parent | 4695d03e5e2b9bb1edfe4c43b8cc20d634c8e372 (diff) | |
download | perl-4c3ed7418bcf4eae5235fb7bcae842820725bea8.tar.gz |
Add OPpLVALUE flag
This flag will be used by the next commit.
Diffstat (limited to 'dump.c')
-rw-r--r-- | dump.c | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -774,6 +774,11 @@ const struct flag_to_name op_sassign_names[] = { {OPpASSIGN_CV_TO_GV, ",CV2GV"} }; +const struct flag_to_name op_leave_names[] = { + {OPpREFCOUNTED, ",REFCOUNTED"}, + {OPpLVALUE, ",LVALUE"} +}; + #define OP_PRIVATE_ONCE(op, flag, name) \ const struct flag_to_name CAT2(op, _names)[] = { \ {(flag), (name)} \ @@ -799,7 +804,7 @@ struct op_private_by_op { const struct op_private_by_op op_private_names[] = { {OP_LEAVESUB, C_ARRAY_LENGTH(op_leavesub_names), op_leavesub_names }, - {OP_LEAVE, C_ARRAY_LENGTH(op_leavesub_names), op_leavesub_names }, + {OP_LEAVE, C_ARRAY_LENGTH(op_leave_names), op_leave_names }, {OP_LEAVESUBLV, C_ARRAY_LENGTH(op_leavesub_names), op_leavesub_names }, {OP_LEAVEWRITE, C_ARRAY_LENGTH(op_leavesub_names), op_leavesub_names }, {OP_DIE, C_ARRAY_LENGTH(op_die_names), op_die_names }, |