From: Jan Dubois <jand@activestate.com>
Date: Mon, 26 Sep 2005 21:19:51 +0000 (-0700)
Subject: mark cannot be const because MEXTEND() modifies it, and tkGlue.c uses MEXTEND()
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=92800dc89ab53a2801e84e2d1b7b7c9f1781d992;p=p5sagit%2Fp5-mst-13.2.git

mark cannot be const because MEXTEND() modifies it, and tkGlue.c uses MEXTEND()
From: "Jan Dubois" <jand@ActiveState.com>
Message-Id: <200509270419.j8R4JtVw026876@smtp3.ActiveState.com>

p4raw-id: //depot/perl@25613
---

diff --git a/XSUB.h b/XSUB.h
index 7f0954c..65c41bd 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -115,7 +115,7 @@ is a lexical $_ in scope.
 
 #define dAXMARK				\
 	I32 ax = POPMARK;	\
-	register SV ** const mark = PL_stack_base + ax++
+	register SV **mark = PL_stack_base + ax++
 
 #define dITEMS I32 items = SP - MARK