Commit b0530272 authored by Simon Marlow's avatar Simon Marlow
Browse files

fix a _TARGET_ARCH that should be _HOST_ARCH

parent bb1cdf56
......@@ -1028,7 +1028,7 @@ freeHaskellFunctionPtr(void* ptr)
} else {
freeStablePtr(*((StgStablePtr*)((unsigned char*)ptr + 0x02)));
}
#elif defined(x86_TARGET_ARCH) && defined(darwin_HOST_OS)
#elif defined(x86_HOST_ARCH) && defined(darwin_HOST_OS)
if ( *(unsigned char*)ptr != 0xe8 ) {
errorBelch("freeHaskellFunctionPtr: not for me, guv! %p\n", ptr);
return;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment