| Subject: | prescan_version doesn't use it's context |
prescan_version() is declared with pTHX_, but it never actually uses the context provided, and so produces warnings like this on a perl built with -Dusethreads and -Accflags="-Wunused-parameter":
vutil.c: In function ‘Perl_prescan_version’:
perl.h:154:22: warning: unused parameter ‘my_perl’ [-Wunused-parameter]
# define pTHX tTHX my_perl PERL_UNUSED_DECL
^
perl.h:167:18: note: in expansion of macro ‘pTHX’
# define pTHX_ pTHX,
^
vutil.c:34:22: note: in expansion of macro ‘pTHX_’
Perl_prescan_version(pTHX_ const char *s, bool strict,
Rather than changing the prototype and possibly breaking soemthing in the future, the best solution is probably adding a PERL_UNUSED_CONTEXT; next to the PERL_ARGS_ASSERT_PRESCAN_VERSION;