about summary refs log tree commit diff
path: root/src/boot
diff options
context:
space:
mode:
authorGraydon Hoare <graydon@mozilla.com>2010-07-26 12:31:43 -0700
committerGraydon Hoare <graydon@mozilla.com>2010-07-26 12:31:43 -0700
commitec5efd25778e64ca273edd650d7606675aaba208 (patch)
treeedce95a4953d10b83ecac9201779841a695aecb9 /src/boot
parentc4897f849c1266506cfbd42a1c53c2866a7b4a1e (diff)
downloadrust-ec5efd25778e64ca273edd650d7606675aaba208.tar.gz
rust-ec5efd25778e64ca273edd650d7606675aaba208.zip
Note the typestate dataflow timing. The culprit is revealed.
Diffstat (limited to 'src/boot')
-rw-r--r--src/boot/me/typestate.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/boot/me/typestate.ml b/src/boot/me/typestate.ml
index 0f8588decda..12e4a8f3bc5 100644
--- a/src/boot/me/typestate.ml
+++ b/src/boot/me/typestate.ml
@@ -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
 ;;