This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove unused var from APItest.xs
authorFather Chrysostomos <sprout@cpan.org>
Thu, 21 Nov 2013 22:43:26 +0000 (14:43 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Fri, 22 Nov 2013 01:51:06 +0000 (17:51 -0800)
This was added at the same time as the containing function in 27fcb6ee.
It was probably due to copy and paste.

ext/XS-APItest/APItest.xs

index 1371207..40eaa96 100644 (file)
@@ -1049,7 +1049,6 @@ peep_xop(pTHX_ OP *o, OP *oldop)
 static I32
 filter_call(pTHX_ int idx, SV *buf_sv, int maxlen)
 {
-    SV   *my_sv = FILTER_DATA(idx);
     char *p;
     char *end;
     int n = FILTER_READ(idx + 1, buf_sv, maxlen);