stop unused-var warnings in ExtUtils-ParseXS tests

These are warnings resulting from unusual features of the specific XS
code in the test suite, not from XS compilation in general.

diff --git a/dist/ExtUtils-ParseXS/Changes b/dist/ExtUtils-ParseXS/Changes
index 7ffdb4e..f9fb36e 100644 (file)
--- a/dist/ExtUtils-ParseXS/Changes
+++ b/dist/ExtUtils-ParseXS/Changes
@@ -3,6 +3,8 @@ Revision history for Perl extension ExtUtils::ParseXS.
 3.36
   - Make generated code avoid warnings about the "items" variable
     being unused
+  - Avoid some unused-variable warnings generated by XS code in the
+    test suite
 
 3.35 - Mon Jul 31 17:50:00 CET 2017
   - Fix ExtUtils-ParseXS/t/*.t that needed '.' in @INC (David Mitchell)

diff --git a/dist/ExtUtils-ParseXS/t/XSTest.xs b/dist/ExtUtils-ParseXS/t/XSTest.xs
index 89df22f..452d3db 100644 (file)
--- a/dist/ExtUtils-ParseXS/t/XSTest.xs
+++ b/dist/ExtUtils-ParseXS/t/XSTest.xs
@@ -76,6 +76,7 @@ bool
 T_BOOL_2(in)
         bool in
     CODE:
+       PERL_UNUSED_VAR(RETVAL);
     OUTPUT: in
 
 void

diff --git a/dist/ExtUtils-ParseXS/t/XSUsage.xs b/dist/ExtUtils-ParseXS/t/XSUsage.xs
index 9a8d93d..ed3c8f8 100644 (file)
--- a/dist/ExtUtils-ParseXS/t/XSUsage.xs
+++ b/dist/ExtUtils-ParseXS/t/XSUsage.xs
@@ -35,6 +35,8 @@ xsusage_two()
     ALIAS:
         two_x = 1
         FOO::two = 2
+    INIT:
+        PERL_UNUSED_VAR(ix);
 
 int
 interface_v_i()