diff options
author | Craig A. Berry <craigberry@mac.com> | 2011-08-25 17:16:13 -0500 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2011-08-25 20:47:59 -0500 |
commit | 64a8239ec9dfc1bed7de64084b6c65e6e05f72f5 (patch) | |
tree | 5b432dc5b5e212ede02f68898ecf75a280eab347 /perl.h | |
parent | 766af94fb242a6c5b6f31e459ea7d2047c0ca242 (diff) | |
download | perl-64a8239ec9dfc1bed7de64084b6c65e6e05f72f5.tar.gz |
void rather than empty parameter for Perl___notused.
Without this, the VMS compiler, with warnings cranked up to level 4,
emits pages and pages of things like:
dVAR;
....^
%CC-I-NOPARMLIST, The declaration of the function Perl___notused has
an empty parameter list. If the function has parameters, they should
be declared here; if it has no parameters, "void" should be specified
in the parameter list.
at line number 100 in file MDA0:[SMOKE.blead]perl.c;1
Over 2,000 of these plus other warnings yields a smoke report of 750K,
which is quite a bit over the 400K limit of the perl.org mailing lists,
not to mention being a slow read.
Diffstat (limited to 'perl.h')
-rw-r--r-- | perl.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -359,7 +359,7 @@ /* Rats: if dTHR is just blank then the subsequent ";" throws an error */ /* Declaring a *function*, instead of a variable, ensures that we don't rely on being able to suppress "unused" warnings. */ -#define dNOOP extern int Perl___notused() +#define dNOOP extern int Perl___notused(void) #ifndef pTHX /* Don't bother defining tTHX and sTHX; using them outside |