This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
inline.h: Suppress g++ warning under threads
authorFather Chrysostomos <sprout@cpan.org>
Sun, 15 May 2016 18:01:36 +0000 (11:01 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 15 May 2016 21:01:28 +0000 (14:01 -0700)
In file included from perl.h:5853,
                 from op.c:103:
inline.h:712: warning: unused parameter 'my_perl'

inline.h

index 35983d8..46f8d9d 100644 (file)
--- a/inline.h
+++ b/inline.h
@@ -715,6 +715,7 @@ S_cx_popwhen(pTHX_ PERL_CONTEXT *cx)
     assert(CxTYPE(cx) == CXt_WHEN);
 
     PERL_UNUSED_ARG(cx);
+    PERL_UNUSED_CONTEXT;
     /* currently NOOP */
 }