From e4c754e44e6595327fa06d11193d02df10fdabc2 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 11 Aug 2003 02:14:02 +0000 Subject: remove debug info --- perl_checker.src/global_checks.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl_checker.src/global_checks.ml b/perl_checker.src/global_checks.ml index bb64bb0..9f32eaf 100644 --- a/perl_checker.src/global_checks.ml +++ b/perl_checker.src/global_checks.ml @@ -435,7 +435,7 @@ let add_package_to_state state package = let package = try let existing_package = Hashtbl.find state.per_package package.package_name in - print_endline_flush (existing_package.file_name ^ " vs " ^ package.file_name); + (*print_endline_flush (existing_package.file_name ^ " vs " ^ package.file_name); *) let vars_declared = existing_package.vars_declared in Hashtbl.iter (fun var pos -> Hashtbl.replace vars_declared var pos) package.vars_declared ; let p = if existing_package.build_time > package.build_time then existing_package else package in -- cgit v1.2.1