diff options
| -rw-r--r-- | rts/eventlog/EventLog.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/eventlog/EventLog.c b/rts/eventlog/EventLog.c index c2d41aa820..2afc092e42 100644 --- a/rts/eventlog/EventLog.c +++ b/rts/eventlog/EventLog.c @@ -759,8 +759,8 @@ void postCapsetVecEvent (EventTypeNum tag, if (size + increment > EVENT_PAYLOAD_SIZE_MAX) { errorBelch("Event size exceeds EVENT_PAYLOAD_SIZE_MAX, record only %" FMT_Int " out of %" FMT_Int " args", - (long long) i, - (long long) argc); + (StgInt) i, + (StgInt) argc); argc = i; break; } else { |