diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-04-28 12:23:18 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-04-28 12:23:18 +0000 |
| commit | 5086a51d09b7d5333b8b39927dba18f04c249237 (patch) | |
| tree | 0b6a730e7f3d2c64de6a4d8fee99dfdd307fd35b /perl_checker.src/parser.mly | |
| parent | 457845c8b46fab3811b282877cc88cd67603f732 (diff) | |
| download | perl_checker-5086a51d09b7d5333b8b39927dba18f04c249237.tar perl_checker-5086a51d09b7d5333b8b39927dba18f04c249237.tar.gz perl_checker-5086a51d09b7d5333b8b39927dba18f04c249237.tar.bz2 perl_checker-5086a51d09b7d5333b8b39927dba18f04c249237.tar.xz perl_checker-5086a51d09b7d5333b8b39927dba18f04c249237.zip | |
handle bad PO-: comments at the lexical level instead of doing it in the grammar
to have a better error message
Diffstat (limited to 'perl_checker.src/parser.mly')
| -rw-r--r-- | perl_checker.src/parser.mly | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/perl_checker.src/parser.mly b/perl_checker.src/parser.mly index 234982b..460fbf3 100644 --- a/perl_checker.src/parser.mly +++ b/perl_checker.src/parser.mly @@ -465,7 +465,6 @@ word_paren: | BAREWORD_PAREN { new_1esp (Ident(None, $1.any, get_pos $1)) $1 } | RAW_IDENT_PAREN { new_1esp (to_Ident $1) $1 } | PO_COMMENT word_paren { po_comment($1); new_esp M_special $2.any $1 $2 } -| PO_COMMENT { die_rule "N(...) must follow the #-PO: comment, with nothing in between" } arraylen: ARRAYLEN_IDENT {new_esp M_int (deref_arraylen (to_Ident $1)) $1 $1} | ARRAYLEN scalar {sp_0($2); new_esp M_int (deref_arraylen $2.any ) $1 $1 } | ARRAYLEN bracket_subscript {new_esp M_int (deref_arraylen $2.any) $1 $2} |