Permalink
Browse files

assert min identifier length in S_pending_ident()

  • Loading branch information...
Zefram
Zefram committed Dec 8, 2017
1 parent 19a498a commit 9291839cdbaa256b811274b66910a960a7f3b06d
Showing with 1 addition and 0 deletions.
  1. +1 −0 toke.c
View
1 toke.c
@@ -8943,6 +8943,7 @@ S_pending_ident(pTHX)
DEBUG_T({ PerlIO_printf(Perl_debug_log,
"### Pending identifier '%s'\n", PL_tokenbuf); });
assert(tokenbuf_len >= 2);
/* if we're in a my(), we can't allow dynamics here.
$foo'bar has already been turned into $foo::bar, so

0 comments on commit 9291839

Please sign in to comment.