X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fwin32%2FOSMem.c;h=f61aadc762c237e399f88bf6424cb8f31bc26637;hb=653e325e08c5f632aa194f9239e938faca5abba5;hp=f4c126403abfa852fd8d4e80880509e9f6d84fe5;hpb=016bac72c041e8589ece82fe86906fc9cf8f950c;p=ghc-hetmet.git diff --git a/rts/win32/OSMem.c b/rts/win32/OSMem.c index f4c1264..f61aadc 100644 --- a/rts/win32/OSMem.c +++ b/rts/win32/OSMem.c @@ -7,9 +7,8 @@ * ---------------------------------------------------------------------------*/ #include "Rts.h" -#include "OSMem.h" +#include "sm/OSMem.h" #include "RtsUtils.h" -#include "RtsMessages.h" #if HAVE_WINDOWS_H #include @@ -255,7 +254,7 @@ void setExecutable (void *p, lnat len, rtsBool exec) exec ? PAGE_EXECUTE_READWRITE : PAGE_READWRITE, &dwOldProtect) == 0) { - sysErrorBelch("makeExecutable: failed to protect 0x%p; old protection: %lu\n", + sysErrorBelch("setExecutable: failed to protect 0x%p; old protection: %lu\n", p, (unsigned long)dwOldProtect); stg_exit(EXIT_FAILURE); }