This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
arybase.xs: Remove extraneous semicolon
[perl5.git] / ext / arybase / arybase.xs
index b5d007b..a2806dd 100644 (file)
@@ -116,7 +116,7 @@ STATIC void set_arybase_to(pTHX_ IV base) {
  sv_setiv_mg(hsv, base);
 }
 
  sv_setiv_mg(hsv, base);
 }
 
-#define old_ck(opname) STATIC OP *(*ab_old_ck_##opname)(pTHX_ OP *) = 0;
+#define old_ck(opname) STATIC OP *(*ab_old_ck_##opname)(pTHX_ OP *) = 0
 old_ck(sassign);
 old_ck(aassign);
 old_ck(aelem);
 old_ck(sassign);
 old_ck(aassign);
 old_ck(aelem);