diff options
| author | simonpj@microsoft.com <unknown> | 2008-09-10 14:20:42 +0000 |
|---|---|---|
| committer | simonpj@microsoft.com <unknown> | 2008-09-10 14:20:42 +0000 |
| commit | 7aac567ca3c3daae7c738230b1d1b2bdda816b96 (patch) | |
| tree | 4c9742b0d1873fa6ce572b63ea82782341e8dadf /rts/Threads.c | |
| parent | 62ee856ca84f409741f472ce3527d6deafa5b62a (diff) | |
| download | haskell-7aac567ca3c3daae7c738230b1d1b2bdda816b96.tar.gz | |
Fix debug message formatting on Windows
Diffstat (limited to 'rts/Threads.c')
| -rw-r--r-- | rts/Threads.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Threads.c b/rts/Threads.c index 281cb65e48..a9d4a721d3 100644 --- a/rts/Threads.c +++ b/rts/Threads.c @@ -698,7 +698,7 @@ printThreadBlockage(StgTSO *tso) break; #if defined(mingw32_HOST_OS) case BlockedOnDoProc: - debugBelch("is blocked on proc (request: %ld)", tso->block_info.async_result->reqID); + debugBelch("is blocked on proc (request: %u)", tso->block_info.async_result->reqID); break; #endif case BlockedOnDelay: |