This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Assignment to a tainted variable was causing confusion if the source
authorNicholas Clark <nick@ccl4.org>
Tue, 2 Jan 2007 21:10:13 +0000 (21:10 +0000)
committerNicholas Clark <nick@ccl4.org>
Tue, 2 Jan 2007 21:10:13 +0000 (21:10 +0000)
commit085bde857c12ca3212eb9b96db84091274a8025c
tree9bfcb8f931a10077e04126004d4dc76ad9a51a4c
parent2e94196c9b65166bc30c1956b01df877a36f8934
Assignment to a tainted variable was causing confusion if the source
value was an NV too large for an IV (bug #40708). Fix the confusion
by not promoting private flags to public flags in S_save_magic if
there are already public flags.

p4raw-id: //depot/perl@29669
mg.c
t/op/taint.t