diff options
| author | Andy Lester <andy@petdance.com> | 2005-10-30 18:04:59 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-10-31 10:18:15 +0000 |
| commit | f5bd084c2c79901a2aea8ac589384123b5b7276d (patch) | |
| tree | 04d09bbea59c7ca77d42cde0ec62ae160e5ec679 /toke.c | |
| parent | 9244d4ad8d4fc2dc937da371d09c6041e465517d (diff) | |
| download | perl-f5bd084c2c79901a2aea8ac589384123b5b7276d.tar.gz | |
S_tokereport's unused parm
Message-ID: <20051031060459.GC10767@petdance.com>
p4raw-id: //depot/perl@25914
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -141,7 +141,7 @@ static const char* const lex_state_names[] = { */ #ifdef DEBUGGING /* Serve -DT. */ -# define REPORT(retval) tokereport(s,(int)retval) +# define REPORT(retval) tokereport((I32)retval) #else # define REPORT(retval) (retval) #endif @@ -282,7 +282,7 @@ static struct debug_tokens { const int token, type; const char *name; } /* dump the returned token in rv, plus any optional arg in yylval */ STATIC int -S_tokereport(pTHX_ const char* s, I32 rv) +S_tokereport(pTHX_ I32 rv) { if (DEBUG_T_TEST) { const char *name = Nullch; |