racket/future: fix debug logging for sync vs. block

When a "synchronized" operation is handled for a future thread
during a `touch' on the future, then still report the handling
as "synchronized" insteda of "blocked".
This commit is contained in:
Matthew Flatt 2012-06-06 12:24:15 +08:00
parent 7a9c8e5d40
commit 269a3392dc

View File

@ -2995,7 +2995,7 @@ static void do_invoke_rtcall(Scheme_Future_State *fs, future_t *future, int is_a
"future %d, process %d: %s: %s; time: %f",
src,
-1,
(is_atomic ? FEVENT_HANDLE_RTCALL_ATOMIC : FEVENT_HANDLE_RTCALL),
(future->rt_prim_is_atomic ? FEVENT_HANDLE_RTCALL_ATOMIC : FEVENT_HANDLE_RTCALL),
get_future_timestamp(),
future->id);
}