summaryrefslogtreecommitdiff
path: root/doio.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-12-04 04:42:25 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-12-04 04:42:25 +0000
commitb89fed5ff1fc43a68f98ebc06fd23230eb6697a8 (patch)
tree36a5b4bd2d82326f1b35dc0f697cea5b0e3a1a36 /doio.c
parente36f48ebb7060aae39976a966a13100fba5c0df0 (diff)
downloadperl-b89fed5ff1fc43a68f98ebc06fd23230eb6697a8.tar.gz
make uninitialized value warnings report opcode
p4raw-id: //depot/perl@4641
Diffstat (limited to 'doio.c')
-rw-r--r--doio.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/doio.c b/doio.c
index 4a0edbbbd2..37e061a535 100644
--- a/doio.c
+++ b/doio.c
@@ -1026,7 +1026,7 @@ Perl_do_print(pTHX_ register SV *sv, PerlIO *fp)
{
dTHR;
if (ckWARN(WARN_UNINITIALIZED))
- Perl_warner(aTHX_ WARN_UNINITIALIZED, PL_warn_uninit);
+ report_uninit();
}
return TRUE;
case SVt_IV: