diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-26 14:14:53 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-26 14:14:53 +0000 |
| commit | 87662a1e8b7376458625666dda3b6b4b7df6172e (patch) | |
| tree | 0ea065de075b5f82aa713cc9556e48c1174fd560 /perl_checker.src/tree.mli | |
| parent | cefb5b411da34efe63a588828410cfe4adc5563f (diff) | |
| download | perl_checker-87662a1e8b7376458625666dda3b6b4b7df6172e.tar perl_checker-87662a1e8b7376458625666dda3b6b4b7df6172e.tar.gz perl_checker-87662a1e8b7376458625666dda3b6b4b7df6172e.tar.bz2 perl_checker-87662a1e8b7376458625666dda3b6b4b7df6172e.tar.xz perl_checker-87662a1e8b7376458625666dda3b6b4b7df6172e.zip | |
*** empty log message ***
Diffstat (limited to 'perl_checker.src/tree.mli')
| -rw-r--r-- | perl_checker.src/tree.mli | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl_checker.src/tree.mli b/perl_checker.src/tree.mli index c655994..769b513 100644 --- a/perl_checker.src/tree.mli +++ b/perl_checker.src/tree.mli @@ -13,6 +13,7 @@ type uses = (string * ((context * string) list option * pos)) list type per_package = { file_name : string ; package_name : string ; has_package_name : bool ; + vars_declared : (context * string, pos) Hashtbl.t; exports : exports ; uses : uses ; body : fromparser list; @@ -26,8 +27,8 @@ type state = { val ignored_packages : string list ref val default_state : state -val get_global_info_from_package : fromparser list -> per_package -val get_global_vars_declaration : state -> per_package -> unit +val get_global_info_from_package : fromparser list -> (string * pos) list * per_package +val get_vars_declaration : state -> per_package -> unit val check_tree : state -> per_package -> unit val die_with_pos : string * int * int -> string -> 'a |