summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-05-25 21:19:38 +0000
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-05-25 21:19:38 +0000
commit97fcbf9696d4cdc3d47f383b99d9840ccb39c616 (patch)
treedb7f5a92355aa3402f174a0065ca2542147c15ee /toke.c
parentae77835f9b08444f73b593d4cdc0758132dbbf00 (diff)
downloadperl-97fcbf9696d4cdc3d47f383b99d9840ccb39c616.tar.gz
Fix up integration 5.003->5.004.
p4raw-id: //depot/perl@19
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index d72b937415..18f72668b2 100644
--- a/toke.c
+++ b/toke.c
@@ -3123,7 +3123,7 @@ yylex()
in_my = TRUE;
s = skipspace(s);
if (isIDFIRST(*s)) {
- s = scan_word(s, tokenbuf, TRUE, &len);
+ s = scan_word(s, tokenbuf, sizeof tokenbuf, TRUE, &len);
in_my_stash = gv_stashpv(tokenbuf, FALSE);
if (!in_my_stash) {
char tmpbuf[1024];