From c408face730fdabecc1d5c91e17b56a1c1e5eb7a Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Wed, 17 Oct 2007 12:18:55 +0000 Subject: [PATCH] fix an error message (barf -> sysErrorBelch) --- rts/win32/OSMem.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/rts/win32/OSMem.c b/rts/win32/OSMem.c index 356c6df..cdecf02 100644 --- a/rts/win32/OSMem.c +++ b/rts/win32/OSMem.c @@ -30,7 +30,8 @@ void setExecutable (void *p, lnat len, rtsBool exec) exec ? PAGE_EXECUTE_READWRITE : PAGE_READWRITE, &dwOldProtect) == 0) { - barf("makeExecutable: failed to protect 0x%p; error=%lu; old protection: %lu\n", - p, (unsigned long)GetLastError(), (unsigned long)dwOldProtect); + sysErrorBelch("makeExecutable: failed to protect 0x%p; old protection: %lu\n", + p, (unsigned long)dwOldProtect); + stg_exit(EXIT_FAILURE); } } -- 1.7.10.4