diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2004-04-23 20:43:02 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2004-04-23 20:43:02 +0000 |
| commit | 29489e7c741791873ea464cb7e13d2b5a19577a7 (patch) | |
| tree | 416b7c61173edafe7ef2746b86383c7663652cdc /pp.c | |
| parent | e22ea7cc8db19b7765901c13e81b890baf3405da (diff) | |
| download | perl-29489e7c741791873ea464cb7e13d2b5a19577a7.tar.gz | |
Include variable names in "Use of uninitialized value" warnings
p4raw-id: //depot/perl@22741
Diffstat (limited to 'pp.c')
| -rw-r--r-- | pp.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -177,7 +177,7 @@ PP(pp_rv2gv) PL_op->op_private & HINT_STRICT_REFS) DIE(aTHX_ PL_no_usym, "a symbol"); if (ckWARN(WARN_UNINITIALIZED)) - report_uninit(); + report_uninit(sv); RETSETUNDEF; } sym = SvPV(sv,len); @@ -238,7 +238,7 @@ PP(pp_rv2sv) PL_op->op_private & HINT_STRICT_REFS) DIE(aTHX_ PL_no_usym, "a SCALAR"); if (ckWARN(WARN_UNINITIALIZED)) - report_uninit(); + report_uninit(sv); RETSETUNDEF; } sym = SvPV(sv, len); |