diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-09-12 20:08:56 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-09-12 20:08:56 +0000 |
commit | 54c5c474ad119efe98b360799e1afc2ec861315f (patch) | |
tree | 93907373e9324237af6ad6dc9d46db3dd003ca30 /objXSUB.h | |
parent | 37131d86ff321c949fae3711d74942ec48f4c37b (diff) | |
download | perl-54c5c474ad119efe98b360799e1afc2ec861315f.tar.gz |
make sprintf("%g",...) threadsafe; only taint its result iff the
formatted result looks nonstandard
p4raw-id: //depot/perl@4130
Diffstat (limited to 'objXSUB.h')
-rw-r--r-- | objXSUB.h | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -130,10 +130,6 @@ #define PL_dowarn (*Perl_Idowarn_ptr(aTHXo)) #undef PL_e_script #define PL_e_script (*Perl_Ie_script_ptr(aTHXo)) -#undef PL_efloatbuf -#define PL_efloatbuf (*Perl_Iefloatbuf_ptr(aTHXo)) -#undef PL_efloatsize -#define PL_efloatsize (*Perl_Iefloatsize_ptr(aTHXo)) #undef PL_egid #define PL_egid (*Perl_Iegid_ptr(aTHXo)) #undef PL_endav @@ -580,6 +576,10 @@ #define PL_dirty (*Perl_Tdirty_ptr(aTHXo)) #undef PL_dumpindent #define PL_dumpindent (*Perl_Tdumpindent_ptr(aTHXo)) +#undef PL_efloatbuf +#define PL_efloatbuf (*Perl_Tefloatbuf_ptr(aTHXo)) +#undef PL_efloatsize +#define PL_efloatsize (*Perl_Tefloatsize_ptr(aTHXo)) #undef PL_extralen #define PL_extralen (*Perl_Textralen_ptr(aTHXo)) #undef PL_firstgv |