diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-02 20:12:35 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-02 20:12:35 +0000 |
| commit | 701155c3ec847cb0cb7ee5ed5a4d56945fe21ab3 (patch) | |
| tree | c22c2519f0354bfc0312bab6852cd72c1bf1689c /perl_checker.src/parser.mly | |
| parent | 874716e3b4afe0cb4048ca716e5178a882b71efd (diff) | |
| download | perl_checker-701155c3ec847cb0cb7ee5ed5a4d56945fe21ab3.tar perl_checker-701155c3ec847cb0cb7ee5ed5a4d56945fe21ab3.tar.gz perl_checker-701155c3ec847cb0cb7ee5ed5a4d56945fe21ab3.tar.bz2 perl_checker-701155c3ec847cb0cb7ee5ed5a4d56945fe21ab3.tar.xz perl_checker-701155c3ec847cb0cb7ee5ed5a4d56945fe21ab3.zip | |
*** empty log message ***
Diffstat (limited to 'perl_checker.src/parser.mly')
| -rw-r--r-- | perl_checker.src/parser.mly | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl_checker.src/parser.mly b/perl_checker.src/parser.mly index 7d7948a..695e88a 100644 --- a/perl_checker.src/parser.mly +++ b/perl_checker.src/parser.mly @@ -220,8 +220,8 @@ term: | term PATTERN_MATCH PATTERN {sp_n($2); sp_p($3); check_unneeded_var_dollar_ ($1); to_Call_op_(P_expr, "m//", sndfst $1 :: from_PATTERN $3) (sp_pos_range $1 $3)} -| term PATTERN_MATCH_NOT PATTERN {sp_n($2); sp_p($3); check_unneeded_var_dollar_s ($1); to_Call_op_(P_expr, "!m//", sndfst $1 :: from_PATTERN $3) (sp_pos_range $1 $3)} -| term PATTERN_MATCH PATTERN_SUBST {sp_n($2); sp_p($3); check_unneeded_var_dollar_not($1); to_Call_op_(P_expr, "s///", sndfst $1 :: from_PATTERN_SUBST $3) (sp_pos_range $1 $3)} +| term PATTERN_MATCH_NOT PATTERN {sp_n($2); sp_p($3); check_unneeded_var_dollar_not($1); to_Call_op_(P_expr, "!m//", sndfst $1 :: from_PATTERN $3) (sp_pos_range $1 $3)} +| term PATTERN_MATCH PATTERN_SUBST {sp_n($2); sp_p($3); check_unneeded_var_dollar_s ($1); to_Call_op_(P_expr, "s///", sndfst $1 :: from_PATTERN_SUBST $3) (sp_pos_range $1 $3)} | term PATTERN_MATCH_NOT PATTERN_SUBST {die_with_rawpos (sndsnd $2) "use =~ instead of !~ and negate the return value"} | term PATTERN_MATCH scalar { (P_expr, Too_complex), sp_pos_range $1 $3} |