Missed a New() -> Newx().
Steve Hay [Tue, 12 Jul 2005 09:01:11 +0000 (09:01 +0000)]
This one only had 3 args to start with! Presumably nobody uses
YYERROR_VERBOSE.  (The yystpcpy() calls don't look right either,
but someone else that is interested in YYERROR_VERBOSE will have
to look into that.)

p4raw-id: //depot/perl@25119

perly.c

diff --git a/perly.c b/perly.c
index 6e92e27..fd4df1d 100644 (file)
--- a/perly.c
+++ b/perly.c
@@ -567,7 +567,7 @@ Perl_yyparse (pTHX)
                    yysize += yystrlen (yytname[yyx]) + 15, yycount++;
            yysize += yystrlen ("syntax error, unexpected ") + 1;
            yysize += yystrlen (yytname[yytype]);
-           New(yymsg, yysize, char *);
+           Newx(yymsg, yysize, char *);
            if (yymsg != 0) {
                const char *yyp = yystpcpy (yymsg, "syntax error, unexpected ");
                yyp = yystpcpy (yyp, yytname[yytype]);