summaryrefslogtreecommitdiff
path: root/cop.h
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2005-10-30 17:44:13 -0600
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-10-31 10:28:32 +0000
commitc4420975666e665b3282e2edeea3304e6626be36 (patch)
treecbbc9f25f78f38d9b5d19ecd3b88bcdef363be6e /cop.h
parentf5bd084c2c79901a2aea8ac589384123b5b7276d (diff)
downloadperl-c4420975666e665b3282e2edeea3304e6626be36.tar.gz
Etta James presents: More consting
Message-ID: <20051031054413.GA10767@petdance.com> p4raw-id: //depot/perl@25915
Diffstat (limited to 'cop.h')
-rw-r--r--cop.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/cop.h b/cop.h
index f1a51fd6b4..6672a53923 100644
--- a/cop.h
+++ b/cop.h
@@ -679,7 +679,7 @@ typedef struct stackinfo PERL_SI;
#define POPSTACK \
STMT_START { \
dSP; \
- PERL_SI *prev = PL_curstackinfo->si_prev; \
+ PERL_SI * const prev = PL_curstackinfo->si_prev; \
if (!prev) { \
PerlIO_printf(Perl_error_log, "panic: POPSTACK\n"); \
my_exit(1); \