diff options
author | Zefram <zefram@fysh.org> | 2010-10-24 05:44:43 +0100 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2010-10-25 12:29:47 -0700 |
commit | 361d9b557e615b7530c603ebd123b12506c9406b (patch) | |
tree | 5a6ef220e84ce6aa671de8e48bb0b54f082edcfe /embed.fnc | |
parent | 8359b381d0e4b7d1489abafb919f3c2a465401a4 (diff) | |
download | perl-361d9b557e615b7530c603ebd123b12506c9406b.tar.gz |
function to parse isolated label
New API function parse_label() parses a label, separate from statements.
If a label has not already been lexed and queued up, it does not use
yylex(), but parses the label itself at the character level, to avoid
unwanted lexing past an absent optional label.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -625,6 +625,7 @@ AMpd |void |lex_read_space |U32 flags : Public parser API AMpd |OP* |parse_block |U32 flags AMpd |OP* |parse_barestmt |U32 flags +AMpd |SV* |parse_label |U32 flags AMpd |OP* |parse_fullstmt |U32 flags AMpd |OP* |parse_stmtseq |U32 flags : Used in various files |