summaryrefslogtreecommitdiff
path: root/perly.c
diff options
context:
space:
mode:
authorCraig A. Berry <craigberry@mac.com>2005-05-28 18:18:46 -0500
committerAbhijit Menon-Sen <ams@wiw.org>2005-05-29 04:45:05 +0000
commit94a11853edc681701a5fe80474ba2a421f2a4aef (patch)
tree2e6d39a23c41cdc6d820f7c9a52d63a1775bab01 /perly.c
parent85827533e60ade365bb1a181edd9766766750b4a (diff)
downloadperl-94a11853edc681701a5fe80474ba2a421f2a4aef.tar.gz
VMS build update for blead
From: "Craig A. Berry" <craigberry@mac.com> Message-Id: <429942A6.10601@mac.com> p4raw-id: //depot/perl@24613
Diffstat (limited to 'perly.c')
-rw-r--r--perly.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/perly.c b/perly.c
index 91f3bb9636..6b9e376625 100644
--- a/perly.c
+++ b/perly.c
@@ -322,7 +322,7 @@ Perl_yyparse (pTHX)
#ifdef DEBUGGING
yyns_sv = NEWSV(73, YYINITDEPTH * sizeof(char *));
SAVEFREESV(yyns_sv);
- yyns = SvPVX_const(yyns_sv);
+ yyns = (const char **) SvPVX(yyns_sv);
yynsp = yyns;
#endif
@@ -366,7 +366,7 @@ Perl_yyparse (pTHX)
yyvs = (YYSTYPE *) SvPVX(yyvs_sv);
#ifdef DEBUGGING
SvGROW(yyns_sv, yystacksize * sizeof(char *));
- yyns = SvPVX_const(yyns_sv);
+ yyns = (const char **) SvPVX(yyns_sv);
if (! yyns)
goto yyoverflowlab;
yynsp = yyns + yysize - 1;