diff options
author | Andy Lester <andy@petdance.com> | 2005-07-28 09:09:56 -0500 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-07-29 08:31:51 +0000 |
commit | 2d03de9c8d99c75ed163fdcdde85a243a29ccc8c (patch) | |
tree | 78d3e20180d05bcabfa8b3f28e74aa3a94e05edf /pp_ctl.c | |
parent | 7adf7a021c614ccf36e9216ce29d1eafb15992bf (diff) | |
download | perl-2d03de9c8d99c75ed163fdcdde85a243a29ccc8c.tar.gz |
More embed.fnc goodness
Message-ID: <20050728190956.GB607@petdance.com>
p4raw-id: //depot/perl@25243
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1408,7 +1408,7 @@ Perl_die_where(pTHX_ const char *message, STRLEN msglen) if (message) { if (PL_in_eval & EVAL_KEEPERR) { static const char prefix[] = "\t(in cleanup) "; - SV *err = ERRSV; + SV * const err = ERRSV; const char *e = Nullch; if (!SvPOK(err)) sv_setpvn(err,"",0); |