Merge captured targets after parsing args

Summary:public
To ensure that e.g. Config.results_dir is not used before being set.

Reviewed By: cristianoc

Differential Revision: D3102724

fb-gh-sync-id: ced0974
fbshipit-source-id: ced0974
master
Josh Berdine 9 years ago committed by Facebook Github Bot 6
parent d41d452b67
commit 6ae225dd62

@ -199,6 +199,9 @@ let reactive_mode = ref false
If a procedure was changed beforehand, keep the changed marking. *) If a procedure was changed beforehand, keep the changed marking. *)
let continue_capture = ref false let continue_capture = ref false
(** Merge the captured results directories specified in the dependency file *)
let merge = ref false
(** Flag for footprint discovery mode *) (** Flag for footprint discovery mode *)
let footprint = ref true let footprint = ref true

@ -165,7 +165,7 @@ let arg_desc =
" activate the eradicate checker for java annotations" " activate the eradicate checker for java annotations"
; ;
"-merge", "-merge",
Arg.Unit MergeCapture.merge_captured_targets, Arg.Set Config.merge,
None, None,
"merge the captured results directories specified in the dependency file" "merge the captured results directories specified in the dependency file"
; ;
@ -238,7 +238,8 @@ let () = (* parse command-line arguments *)
begin begin
L.err "ERROR: results directory %s does not exist@.@." !Config.results_dir; L.err "ERROR: results directory %s does not exist@.@." !Config.results_dir;
print_usage_exit () print_usage_exit ()
end end ;
if !Config.merge then MergeCapture.merge_captured_targets ()
let analyze_exe_env exe_env = let analyze_exe_env exe_env =
let init_time = Unix.gettimeofday () in let init_time = Unix.gettimeofday () in

Loading…
Cancel
Save