diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-05-13 01:28:49 +0300 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-05-12 20:57:07 +0000 |
| commit | d9fad198da41e1cd37600ae397146e27a413303d (patch) | |
| tree | 79dab04c73d50aa2a12e95f128a8cc3361ec5908 /toke.c | |
| parent | 54f961c9c7fe5166a70653b44c67c26122bfc1fd (diff) | |
| download | perl-d9fad198da41e1cd37600ae397146e27a413303d.tar.gz | |
Re: [PATCH] my_snprintf
Message-ID: <4464E1F1.9010706@gmail.com>
p4raw-id: //depot/perl@28183
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 6 |
1 files changed, 1 insertions, 5 deletions
@@ -5976,11 +5976,7 @@ Perl_yylex(pTHX) if (!PL_in_my_stash) { char tmpbuf[1024]; PL_bufptr = s; -#ifdef USE_SNPRINTF - snprintf(tmpbuf, sizeof(tmpbuf), "No such class %.1000s", PL_tokenbuf); -#else - sprintf(tmpbuf, "No such class %.1000s", PL_tokenbuf); -#endif /* #ifdef USE_SNPRINTF */ + my_snprintf(tmpbuf, sizeof(tmpbuf), "No such class %.1000s", PL_tokenbuf); yyerror(tmpbuf); } #ifdef PERL_MAD |