Skip to content

Commit 88938aa

Browse files
committed
B.xs: fix syntax err in PERL_VERSION < 17
The blead version of B.xs obviously hasn't been able to be compiled on old perls for a while. This fixes one such syntax error, blind.
1 parent 62ead80 commit 88938aa

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

ext/B/B.xs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -676,7 +676,7 @@ struct OP_methods {
676676
#if PERL_VERSION >= 17
677677
{ STR_WITH_LEN("code_list"),OPp, STRUCT_OFFSET(struct pmop, op_code_list),},/*13*/
678678
#else
679-
{ STR_WITH_LEN("code_list"),op_offset_special, 0,
679+
{ STR_WITH_LEN("code_list"),op_offset_special, 0, }, /*13*/
680680
#endif
681681
{ STR_WITH_LEN("sv"), SVp, STRUCT_OFFSET(struct svop, op_sv), },/*14*/
682682
{ STR_WITH_LEN("gv"), SVp, STRUCT_OFFSET(struct svop, op_sv), },/*15*/

0 commit comments

Comments
 (0)