[PATCH] Fix RTS compiler error when DEBUG is defined.

Erik de Castro Lopo erikd at mega-nerd.com
Sat May 21 03:20:43 CEST 2011


---
 rts/Trace.c |    8 ++++----
 1 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/rts/Trace.c b/rts/Trace.c
index fb8e922..a8519c9 100644
--- a/rts/Trace.c
+++ b/rts/Trace.c
@@ -267,16 +267,16 @@ 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 %u of type %u\n", (uint32_t) capset, (uint32_t) other);
             break;
         case EVENT_CAPSET_DELETE:   // (capset)
-            debugBelch("deleted capset %d\n", capset);
+            debugBelch("deleted capset %u\n", (uint32_t) capset);
             break;
         case EVENT_CAPSET_ASSIGN_CAP:  // (capset, capno)
-            debugBelch("assigned cap %d to capset %d\n", other, capset);
+            debugBelch("assigned cap %u to capset %u\n", (uint32_t) other, (uint32_t) capset);
             break;
         case EVENT_CAPSET_REMOVE_CAP:  // (capset, capno)
-            debugBelch("removed cap %d from capset %d\n", other, capset);
+            debugBelch("removed cap %u from capset %u\n", (uint32_t) other, (uint32_t) capset);
             break;
         }
         RELEASE_LOCK(&trace_utx);
-- 
1.7.2.5


--Multipart=_Sat__21_May_2011_11_49_25_+1000_DXFU5EE4jZN6_QCG--



More information about the Cvs-ghc mailing list