mirror of
https://github.com/Stichting-MINIX-Research-Foundation/pkgsrc-ng.git
synced 2025-09-08 03:44:13 -04:00
32 lines
1.1 KiB
C
32 lines
1.1 KiB
C
$NetBSD: patch-rts_StgCRun.c,v 1.1 2013/12/12 12:47:17 obache Exp $
|
|
|
|
We have to make the visiblity of StgRun and StgReturn to "hidden" not
|
|
to trigger a bug in old binutils which results in:
|
|
|
|
ld: rts/dist/build/RtsStartup.dyn_o: relocation R_X86_64_PC32
|
|
against `StgRun' can not be used when making a shared object;
|
|
recompile with -fPIC
|
|
|
|
With this workaround we can no longer override those two symbols using
|
|
LD_PRELOAD, but I think there is no reason to do so anyway.
|
|
|
|
|
|
--- rts/StgCRun.c.orig 2013-01-27 13:21:52.000000000 +0000
|
|
+++ rts/StgCRun.c
|
|
@@ -246,6 +246,7 @@ StgRunIsImplementedInAssembler(void)
|
|
* save callee-saves registers on behalf of the STG code.
|
|
*/
|
|
".globl " STG_RUN "\n"
|
|
+ ".hidden " STG_RUN "\n"
|
|
STG_RUN ":\n\t"
|
|
"subq %1, %%rsp\n\t"
|
|
"movq %%rsp, %%rax\n\t"
|
|
@@ -280,6 +281,7 @@ StgRunIsImplementedInAssembler(void)
|
|
"jmp *%%rax\n\t"
|
|
|
|
".globl " STG_RETURN "\n"
|
|
+ ".hidden " STG_RETURN "\n"
|
|
STG_RETURN ":\n\t"
|
|
|
|
"movq %%rbx, %%rax\n\t" /* Return value in R1 */
|