diff options
author | Ben Gamari <ben@smart-cactus.org> | 2022-05-10 13:56:02 -0400 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-05-11 20:06:51 -0400 |
commit | dea9a3d90d657705be073fd4e0db64e76d717a0f (patch) | |
tree | 006ae2d973161752ececd14a624efefb7446a6d2 /rts/win32 | |
parent | 3c998f0d5f91742f0474e0eb76082e069ecb0cf4 (diff) | |
download | haskell-dea9a3d90d657705be073fd4e0db64e76d717a0f.tar.gz |
rts: Drop setExecutable
Since f6e366c058b136f0789a42222b8189510a3693d1 setExecutable has been
dead code. Drop it.
Diffstat (limited to 'rts/win32')
-rw-r--r-- | rts/win32/OSMem.c | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/rts/win32/OSMem.c b/rts/win32/OSMem.c index c192fb5923..4c643a97c2 100644 --- a/rts/win32/OSMem.c +++ b/rts/win32/OSMem.c @@ -423,19 +423,6 @@ StgWord64 getPhysicalMemorySize (void) return physMemSize; } -void setExecutable (void *p, W_ len, bool exec) -{ - DWORD dwOldProtect = 0; - if (VirtualProtect (p, len, - exec ? PAGE_EXECUTE_READWRITE : PAGE_READWRITE, - &dwOldProtect) == 0) - { - sysErrorBelch("setExecutable: failed to protect 0x%p; old protection: " - "%lu\n", p, (unsigned long)dwOldProtect); - stg_exit(EXIT_FAILURE); - } -} - #if defined(USE_LARGE_ADDRESS_SPACE) static void* heap_base = NULL; |