src/Pure/PIDE/document.ML
changeset 41629 5490dc4d999d
parent 41537 3837045cc8a1
child 41630 a7a93df23664
     1.1 --- a/src/Pure/PIDE/document.ML	Mon Jan 24 21:30:33 2011 +0100
     1.2 +++ b/src/Pure/PIDE/document.ML	Tue Jan 25 20:06:32 2011 +0100
     1.3 @@ -284,6 +284,7 @@
     1.4  fun edit (old_id: version_id) (new_id: version_id) edits state =
     1.5    let
     1.6      val old_version = the_version state old_id;
     1.7 +    val _ = Time.now ();  (* FIXME odd workaround *)
     1.8      val new_version = fold edit_nodes edits old_version;
     1.9  
    1.10      fun update_node name (rev_updates, version, st) =