diff options
| author | Andy Lester <andy@petdance.com> | 2005-06-20 05:22:37 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-20 15:12:50 +0000 |
| commit | 4c4dcb5f50b42cfc8a44421193b5d4c49d049f27 (patch) | |
| tree | 018888fffdf323f44128fe1434e39e7b5cccceae /perl.h | |
| parent | a1d0c266b48656e77ee25c0121f81fcda5e41ce0 (diff) | |
| download | perl-4c4dcb5f50b42cfc8a44421193b5d4c49d049f27.tar.gz | |
The continuing adventures of Constman and Localize Boy
Message-ID: <20050620152237.GA5032@petdance.com>
p4raw-id: //depot/perl@24913
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 13 |
1 files changed, 7 insertions, 6 deletions
@@ -210,16 +210,17 @@ * for silencing unused variables that are actually used most of the time, * but we cannot quite get rid of, such as "ax" in PPCODE+noargs xsubs */ -#define PERL_UNUSED_VAR(var) ((void)var) - -#ifndef LINT_UNUSED_ARG +#ifndef PERL_UNUSED_ARG # ifdef lint # include <note.h> -# define LINT_UNUSED_ARG(x) NOTE(ARGUNUSED(x)) +# define PERL_UNUSED_ARG(x) NOTE(ARGUNUSED(x)) # else -# define LINT_UNUSED_ARG(x) +# define PERL_UNUSED_ARG(x) ((void)x) # endif #endif +#ifndef PERL_UNUSED_VAR +# define PERL_UNUSED_VAR(x) ((void)x) +#endif #define NOOP (void)0 #define dNOOP extern int Perl___notused PERL_UNUSED_DECL @@ -2825,7 +2826,7 @@ typedef I32 CHECKPOINT; body arenas */ struct ptr_tbl_ent { struct ptr_tbl_ent* next; - void* oldval; + const void* oldval; void* newval; }; |