From aa538c1db99be4efb2724bb8c4a378b9d68a28ec Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Tue, 31 May 2011 09:47:59 +0100 Subject: [PATCH] fix format specs on 64-bit builds --- rts/Trace.c | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/rts/Trace.c b/rts/Trace.c index e472c5a..58f77ed 100644 --- a/rts/Trace.c +++ b/rts/Trace.c @@ -267,16 +267,18 @@ void traceCapsetModify_ (EventTypeNum tag, tracePreface(); switch (tag) { case EVENT_CAPSET_CREATE: // (capset, capset_type) - debugBelch("created capset %d of type %d\n", capset, other); + debugBelch("created capset %lu of type %d\n", (lnat)capset, other); break; case EVENT_CAPSET_DELETE: // (capset) - debugBelch("deleted capset %d\n", capset); + debugBelch("deleted capset %lu\n", (lnat)capset); break; case EVENT_CAPSET_ASSIGN_CAP: // (capset, capno) - debugBelch("assigned cap %d to capset %d\n", other, capset); + debugBelch("assigned cap %lu to capset %lu\n", + (lnat)other, (lnat)capset); break; case EVENT_CAPSET_REMOVE_CAP: // (capset, capno) - debugBelch("removed cap %d from capset %d\n", other, capset); + debugBelch("removed cap %lu from capset %lu\n", + (lnat)other, (lnat)capset); break; } RELEASE_LOCK(&trace_utx); -- 1.7.10.4