diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-03-29 14:15:59 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-05-18 20:26:54 +0100 |
| commit | 72d749260665bf3a57913ccb056f7d8cba9a2d99 (patch) | |
| tree | c443ff554386a8a93e1c8d7f37717a3629a3b0a1 /pp_sys.c | |
| parent | 9de10d5cc42400cb24ab416f95826fe4d2a152a6 (diff) | |
| download | perl-72d749260665bf3a57913ccb056f7d8cba9a2d99.tar.gz | |
In pp_warn and pp_die, eliminate pv, which is assigned to but never read.
Diffstat (limited to 'pp_sys.c')
| -rw-r--r-- | pp_sys.c | 6 |
1 files changed, 2 insertions, 4 deletions
@@ -419,7 +419,6 @@ PP(pp_warn) { dVAR; dSP; dMARK; SV *exsv; - const char *pv; STRLEN len; if (SP - MARK > 1) { dTARGET; @@ -436,7 +435,7 @@ PP(pp_warn) exsv = TOPs; } - if (SvROK(exsv) || (pv = SvPV_const(exsv, len), len)) { + if (SvROK(exsv) || (SvPV_const(exsv, len), len)) { /* well-formed exception supplied */ } else if (SvROK(ERRSV)) { @@ -459,7 +458,6 @@ PP(pp_die) { dVAR; dSP; dMARK; SV *exsv; - const char *pv; STRLEN len; #ifdef VMS VMSISH_HUSHED = VMSISH_HUSHED || (PL_op->op_private & OPpHUSH_VMSISH); @@ -474,7 +472,7 @@ PP(pp_die) exsv = TOPs; } - if (SvROK(exsv) || (pv = SvPV_const(exsv, len), len)) { + if (SvROK(exsv) || (SvPV_const(exsv, len), len)) { /* well-formed exception supplied */ } else if (SvROK(ERRSV)) { |