diff options
Diffstat (limited to 'rts/adjustor/NativeAlpha.c')
-rw-r--r-- | rts/adjustor/NativeAlpha.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/rts/adjustor/NativeAlpha.c b/rts/adjustor/NativeAlpha.c index 7c69b5d3b7..e36a38d9dc 100644 --- a/rts/adjustor/NativeAlpha.c +++ b/rts/adjustor/NativeAlpha.c @@ -103,8 +103,5 @@ freeHaskellFunctionPtr(void* ptr) /* Free the stable pointer first..*/ freeStablePtr(*((StgStablePtr*)((unsigned char*)ptr + 0x10))); - // Can't write to this memory, it is only executable: - // *((unsigned char*)ptr) = '\0'; - freeExec(ptr); } |