summaryrefslogtreecommitdiff
path: root/embed.pl
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-09-12 20:08:56 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-09-12 20:08:56 +0000
commit7d5ea4e771e13c538d9f0504cb48d13891fcb5c9 (patch)
tree93907373e9324237af6ad6dc9d46db3dd003ca30 /embed.pl
parent2b8dc4d2eb8ad36cf53b962575087dfa9dc6d602 (diff)
downloadperl-7d5ea4e771e13c538d9f0504cb48d13891fcb5c9.tar.gz
make sprintf("%g",...) threadsafe; only taint its result iff the
formatted result looks nonstandard p4raw-id: //depot/perl@4130
Diffstat (limited to 'embed.pl')
-rwxr-xr-xembed.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/embed.pl b/embed.pl
index 5f0711f493..eaee6f7264 100755
--- a/embed.pl
+++ b/embed.pl
@@ -1653,10 +1653,10 @@ p |bool |sv_upgrade |SV* sv|U32 mt
p |void |sv_usepvn |SV* sv|char* ptr|STRLEN len
p |void |sv_vcatpvfn |SV* sv|const char* pat|STRLEN patlen \
|va_list* args|SV** svargs|I32 svmax \
- |bool *used_locale
+ |bool *maybe_tainted
p |void |sv_vsetpvfn |SV* sv|const char* pat|STRLEN patlen \
|va_list* args|SV** svargs|I32 svmax \
- |bool *used_locale
+ |bool *maybe_tainted
p |SV* |swash_init |char* pkg|char* name|SV* listsv \
|I32 minbits|I32 none
p |UV |swash_fetch |SV *sv|U8 *ptr