diff options
| author | Ian Lynagh <igloo@earth.li> | 2011-06-01 01:07:01 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2011-06-01 01:07:01 +0100 |
| commit | 02c4f41730b234728a408bbf29607d0345d2b481 (patch) | |
| tree | d4157571c8761418d5836e8804dda0fcc247ca9e /rts | |
| parent | 1f7ab811c4421458568b0ed900b496192fee885b (diff) | |
| download | haskell-02c4f41730b234728a408bbf29607d0345d2b481.tar.gz | |
Fix a warning in DEBUG code
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/Trace.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Trace.c b/rts/Trace.c index 58f77edd4d..70f4a39742 100644 --- a/rts/Trace.c +++ b/rts/Trace.c @@ -267,7 +267,7 @@ void traceCapsetModify_ (EventTypeNum tag, tracePreface(); switch (tag) { case EVENT_CAPSET_CREATE: // (capset, capset_type) - debugBelch("created capset %lu of type %d\n", (lnat)capset, other); + debugBelch("created capset %lu of type %d\n", (lnat)capset, (int)other); break; case EVENT_CAPSET_DELETE: // (capset) debugBelch("deleted capset %lu\n", (lnat)capset); |