diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-05-23 13:45:12 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-05-23 13:45:12 +0000 |
| commit | fd7077b4fa1903b53aa21bbb6774e8a90cd5a29d (patch) | |
| tree | 9831573511290fca4da4c56a96e5a2af9744355c /perl_checker.src/parser.mly | |
| parent | 697d81fb486988bacb73e13c13bbdb65be775b2c (diff) | |
| download | perl-MDK-Common-fd7077b4fa1903b53aa21bbb6774e8a90cd5a29d.tar perl-MDK-Common-fd7077b4fa1903b53aa21bbb6774e8a90cd5a29d.tar.gz perl-MDK-Common-fd7077b4fa1903b53aa21bbb6774e8a90cd5a29d.tar.bz2 perl-MDK-Common-fd7077b4fa1903b53aa21bbb6774e8a90cd5a29d.tar.xz perl-MDK-Common-fd7077b4fa1903b53aa21bbb6774e8a90cd5a29d.zip | |
- suggest any instead of grep in scalar context
- suggest foreach instead of map in empty context
Diffstat (limited to 'perl_checker.src/parser.mly')
| -rw-r--r-- | perl_checker.src/parser.mly | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl_checker.src/parser.mly b/perl_checker.src/parser.mly index 0395859..d2dc1fd 100644 --- a/perl_checker.src/parser.mly +++ b/perl_checker.src/parser.mly @@ -267,7 +267,7 @@ term: | DECR term {sp_0($2); mcontext_check M_int $2; to_Call_op_ (M_mixed [M_int ; M_none]) P_tight "--" [$2.any.expr] $1 $2} | term INCR {sp_0($2); mcontext_check M_int $1; to_Call_op_ (M_mixed [M_int ; M_none]) P_tight "++ post" [$1.any.expr] $1 $2} | term DECR {sp_0($2); mcontext_check M_int $1; to_Call_op_ (M_mixed [M_int ; M_none]) P_tight "-- post" [$1.any.expr] $1 $2} -| NOT argexpr {warn_rule "don't use \"not\", use \"!\" instead"; to_Call_op_ (mcontext_unop M_scalar $2) P_and "not" ($2.any.expr) $1 $2} +| NOT argexpr {warn_rule "don't use \"not\", use \"!\" instead"; to_Call_op_ (mcontext_unop_l M_scalar $2) P_and "not" ($2.any.expr) $1 $2} /* Constructors for anonymous data */ |