diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-05 23:24:35 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-05 23:24:35 +0000 |
commit | c6bad2017a04dd8d10ddc7e38bf78bfd121b52c4 (patch) | |
tree | 47f048ea0d047a659f051fbc24b7bfb0e89f16d4 /perl_checker.src/parser_helper.mli | |
parent | d1609de77aeb01a784950d707354770bde196782 (diff) | |
download | perl_checker-c6bad2017a04dd8d10ddc7e38bf78bfd121b52c4.tar perl_checker-c6bad2017a04dd8d10ddc7e38bf78bfd121b52c4.tar.gz perl_checker-c6bad2017a04dd8d10ddc7e38bf78bfd121b52c4.tar.bz2 perl_checker-c6bad2017a04dd8d10ddc7e38bf78bfd121b52c4.tar.xz perl_checker-c6bad2017a04dd8d10ddc7e38bf78bfd121b52c4.zip |
perl_checker now checks usage of $_
Diffstat (limited to 'perl_checker.src/parser_helper.mli')
-rw-r--r-- | perl_checker.src/parser_helper.mli | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl_checker.src/parser_helper.mli b/perl_checker.src/parser_helper.mli index a5b0837..d3a1028 100644 --- a/perl_checker.src/parser_helper.mli +++ b/perl_checker.src/parser_helper.mli @@ -5,7 +5,7 @@ val pos_range : val sp_pos_range : 'a * ('b * (int * int)) -> 'c * ('d * (int * int)) -> 'b * (int * int) val get_pos : 'a * ('b * ('c * 'd)) -> string * 'c * 'd -val var_dollar_ : Types.fromparser +val var_dollar_ : Types.pos -> Types.fromparser val var_STDOUT : Types.fromparser val is_var_dollar_ : Types.fromparser -> bool val is_var_number_match : Types.fromparser -> bool @@ -110,7 +110,8 @@ val op_p : 'a * ((unit * (Types.spaces * (int * 'd))) * 'b) val sub_declaration : Types.fromparser * string -> Types.fromparser list -> Types.fromparser -val anonymous_sub : Types.fromparser list -> Types.fromparser +val anonymous_sub : + Types.fromparser list * ('a * (int * int)) -> Types.fromparser val cook_call_op : string * Types.fromparser list * (int * int) -> Types.fromparser val call_op_ : |