summaryrefslogtreecommitdiff
path: root/XSUB.h
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2007-05-24 08:25:43 -0500
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-05-25 07:46:08 +0000
commit61f9802b72e0698621aaf73d88595b3d5d85df0a (patch)
tree56699be942b4fd1f511550b68595c2eb94e2d5ce /XSUB.h
parent4440d13a03087bebaa0394cf532fe7ebcda34a06 (diff)
downloadperl-61f9802b72e0698621aaf73d88595b3d5d85df0a.tar.gz
Consting dump.c
Message-Id: <B46A083E-A133-4D38-9BE8-BE1EB0AAA326@petdance.com> p4raw-id: //depot/perl@31270
Diffstat (limited to 'XSUB.h')
-rw-r--r--XSUB.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/XSUB.h b/XSUB.h
index bff12e3457..c93ed2d38a 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -262,7 +262,7 @@ Rethrows a previously caught exception. See L<perlguts/"Exception Handling">.
#define XSRETURN(off) \
STMT_START { \
- IV tmpXSoff = (off); \
+ const IV tmpXSoff = (off); \
PL_stack_sp = PL_stack_base + ax + (tmpXSoff - 1); \
return; \
} STMT_END