diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-23 07:01:34 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-25 06:42:58 -0400 |
| commit | 20b7effb9761caf5aee8475b6a6d731b40c80cd7 (patch) | |
| tree | 21daa8d7a8d91dd62ad42ceefe7027787d7ceaf5 /numeric.c | |
| parent | 51f14a05690a52120145e5118962964658734217 (diff) | |
| download | perl-20b7effb9761caf5aee8475b6a6d731b40c80cd7.tar.gz | |
Remove or downgrade unnecessary dVAR.
You need to configure with g++ *and* -Accflags=-DPERL_GLOBAL_STRUCT
or -Accflags=-DPERL_GLOBAL_STRUCT_PRIVATE to see any difference.
(g++ does not do the "post-annotation" form of "unused".)
The version code has some of these issues, reported upstream.
Diffstat (limited to 'numeric.c')
| -rw-r--r-- | numeric.c | 5 |
1 files changed, 0 insertions, 5 deletions
@@ -259,7 +259,6 @@ on this platform. UV Perl_grok_hex(pTHX_ const char *start, STRLEN *len_p, I32 *flags, NV *result) { - dVAR; const char *s = start; STRLEN len = *len_p; UV value = 0; @@ -520,8 +519,6 @@ bool Perl_grok_numeric_radix(pTHX_ const char **sp, const char *send) { #ifdef USE_LOCALE_NUMERIC - dVAR; - PERL_ARGS_ASSERT_GROK_NUMERIC_RADIX; if (IN_LC(LC_NUMERIC)) { @@ -850,8 +847,6 @@ Perl_my_atof(pTHX_ const char* s) { NV x = 0.0; #ifdef USE_LOCALE_NUMERIC - dVAR; - PERL_ARGS_ASSERT_MY_ATOF; { |