X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Finterr.c;h=889d64466d7e5227da777ebe8046d6cc7ec98481;hb=7f1e94ae961a198e00daf281eb1dc858e5b2dcc7;hp=22cbc2a7004e3d5d6b6801f0b6b5847a57bb3ae7;hpb=5cfc11977fc09cfb6a95f3d9d485deb147b8f7d3;p=sbcl.git

diff --git a/src/runtime/interr.c b/src/runtime/interr.c
index 22cbc2a..889d644 100644
--- a/src/runtime/interr.c
+++ b/src/runtime/interr.c
@@ -88,7 +88,7 @@ void print_message(char *fmt, va_list ap)
 {
     fprintf(stderr, " in SBCL pid %d",getpid());
 #if defined(LISP_FEATURE_SB_THREAD)
-    fprintf(stderr, "(tid %lu)", (unsigned long) thread_self());
+    fprintf(stderr, "(tid %lu)", (uword_t) thread_self());
 #endif
     if (fmt) {
         fprintf(stderr, ":\n");