author | wenzelm |
Thu, 27 Aug 2009 17:00:03 +0200 | |
changeset 32420 | 6473d1952023 |
parent 32419 | 016134424f71 |
child 32421 | 8713597307a9 |
--- 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; " ^