From 356f793917439c37c140e3e76963e2f0e391dc64 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Wed, 4 Sep 2013 11:00:12 +0100 Subject: Fix printf formats for pathchar on Windows (where it's wchar_t, not char) --- rts/CheckUnload.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'rts/CheckUnload.c') diff --git a/rts/CheckUnload.c b/rts/CheckUnload.c index a758b06db3..0485ed4887 100644 --- a/rts/CheckUnload.c +++ b/rts/CheckUnload.c @@ -254,7 +254,7 @@ void checkUnload (StgClosure *static_objects) // Mark every unloadable object as unreferenced initially for (oc = unloaded_objects; oc; oc = oc->next) { - IF_DEBUG(linker, debugBelch("Checking whether to unload %s\n", + IF_DEBUG(linker, debugBelch("Checking whether to unload %" PATH_FMT "\n", oc->fileName)); oc->referenced = rtsFalse; } @@ -290,12 +290,12 @@ void checkUnload (StgClosure *static_objects) } else { prev->next = oc->next; } - IF_DEBUG(linker, debugBelch("Unloading object file %s\n", + IF_DEBUG(linker, debugBelch("Unloading object file %" PATH_FMT "\n", oc->fileName)); freeObjectCode(oc); } else { - IF_DEBUG(linker, debugBelch("Object file still in use: %s\n", - oc->fileName)); + IF_DEBUG(linker, debugBelch("Object file still in use: %" + PATH_FMT "\n", oc->fileName)); } } -- cgit v1.2.1