From: Marcus Holland-Moritz <mhx-perl@gmx.net>
Date: Wed, 2 Feb 2005 21:33:12 +0000 (+0000)
Subject: Remove 2 unused variables from APItest.xs.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=14b40fa7a92ebfc0647a15ef6114c7c26b280915;p=p5sagit%2Fp5-mst-13.2.git

Remove 2 unused variables from APItest.xs.

p4raw-id: //depot/perl@23927
---

diff --git a/ext/XS/APItest/APItest.xs b/ext/XS/APItest/APItest.xs
index fcdcc9a..c562b98 100644
--- a/ext/XS/APItest/APItest.xs
+++ b/ext/XS/APItest/APItest.xs
@@ -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);