Skip to content

Commit 9bc8cde

Browse files
committed
Add #define for the maximum Perl identifier length
This gives a more meaningful mnemonic
1 parent fec412a commit 9bc8cde

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

parser.h

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -10,6 +10,7 @@
1010
*/
1111

1212
#define YYEMPTY (-2)
13+
#define PERL_IDENTIFIER_LENGTH (256 * MAX_UNICODE_UTF8_BYTES)
1314

1415
typedef struct {
1516
YYSTYPE val; /* semantic value */
@@ -112,7 +113,7 @@ typedef struct yy_parser {
112113
U8 lex_fakeeof; /* precedence at which to fake EOF */
113114
U8 lex_flags;
114115
COP *saved_curcop; /* the previous PL_curcop */
115-
char tokenbuf[ 256 * MAX_UNICODE_UTF8_BYTES ];
116+
char tokenbuf[ PERL_IDENTIFIER_LENGTH ];
116117
line_t herelines; /* number of lines in here-doc */
117118
line_t preambling; /* line # when processing $ENV{PERL5DB} */
118119

0 commit comments

Comments
 (0)