This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove 2 unused variables from APItest.xs.
authorMarcus Holland-Moritz <mhx-perl@gmx.net>
Wed, 2 Feb 2005 21:33:12 +0000 (21:33 +0000)
committerMarcus Holland-Moritz <mhx-perl@gmx.net>
Wed, 2 Feb 2005 21:33:12 +0000 (21:33 +0000)
p4raw-id: //depot/perl@23927

ext/XS/APItest/APItest.xs

index fcdcc9a..c562b98 100644 (file)
@@ -315,8 +315,6 @@ SV*
 eval_pv(p, croak_on_error)
     const char* p
     I32 croak_on_error
-    PREINIT:
-       I32 i;
     PPCODE:
        PUTBACK;
        EXTEND(SP, 1);
@@ -325,8 +323,6 @@ eval_pv(p, croak_on_error)
 void
 require_pv(pv)
     const char* pv
-    PREINIT:
-       I32 i;
     PPCODE:
        PUTBACK;
        require_pv(pv);