summaryrefslogtreecommitdiff
path: root/rts/adjustor/NativeAlpha.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/adjustor/NativeAlpha.c')
-rw-r--r--rts/adjustor/NativeAlpha.c3
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);
}