# HG changeset patch # User wenzelm # Date 1251385203 -7200 # Node ID 6473d19520233baac8cee2754d43276938cfa7f8 # Parent 016134424f71926d7fb3747404337eced61f3dff tuned tracing; diff -r 016134424f71 -r 6473d1952023 src/Pure/Concurrent/future.ML --- a/src/Pure/Concurrent/future.ML Thu Aug 27 11:54:17 2009 +0200 +++ b/src/Pure/Concurrent/future.ML Thu Aug 27 17:00:03 2009 +0200 @@ -237,7 +237,7 @@ val total = length (! workers); val active = count_active (); in - "SCHEDULE: " ^ + "SCHEDULE " ^ string_of_int (Time.toMilliseconds now) ^ ": " ^ string_of_int ready ^ " ready, " ^ string_of_int pending ^ " pending, " ^ string_of_int running ^ " running; " ^