From 8b1fd2609919dfa8b889f13f91e80885177ba737 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Tue, 24 Apr 2012 17:19:58 +0100 Subject: A couple of build fixes for Win64 --- rts/eventlog/EventLog.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'rts/eventlog') diff --git a/rts/eventlog/EventLog.c b/rts/eventlog/EventLog.c index a3103775d9..66b589e282 100644 --- a/rts/eventlog/EventLog.c +++ b/rts/eventlog/EventLog.c @@ -237,7 +237,10 @@ initEventLogging(void) // Forked process, eventlog already started by the parent // before fork event_log_pid = getpid(); - sprintf(event_log_filename, "%s.%d.eventlog", prog, event_log_pid); + // We don't have a FMT* symbol for pid_t, so we go via Word64 + // to be sure of not losing range. It would be nicer to have a + // FMT* symbol or similar, though. + sprintf(event_log_filename, "%s.%" FMT_Word64 ".eventlog", prog, (StgWord64)event_log_pid); } stgFree(prog); -- cgit v1.2.1