Note the typestate dataflow timing. The culprit is revealed.

This commit is contained in:
Graydon Hoare 2010-07-26 12:31:43 -07:00
parent c4897f849c
commit ec5efd2577

View file

@ -1220,7 +1220,8 @@ let process_crate
in
let log_flag = cx.ctxt_sess.Session.sess_log_typestate in
run_passes cx "typestate setup" path setup_passes log_flag log crate;
run_dataflow cx constr_id graph;
Session.time_inner "typestate dataflow" cx.ctxt_sess
(fun _ -> run_dataflow cx constr_id graph);
run_passes cx "typestate verify" path verify_passes log_flag log crate;
run_passes cx "typestate aux" path aux_passes log_flag log crate
;;