git-svn-id: trunk@31208 -
@@ -104,10 +104,9 @@ _start:
je .L9
movq -48(%rbp), %rdi
call atexit
- jmp .L11
.L9:
call _init_tls
-.L11:
+ call _rtld_call_init
movl $_fini, %edi
call _init
@@ -49,6 +49,8 @@ FPC_SHARED_LIB_START:
movb $1,operatingsystem_islibrary(%rip)
#movq operatingsystem_islibrary@GOTPCREL(%rip),%rax
#movb $1,(%rax)
+ call _init_tls@PLT
+ call _rtld_call_init@PLT
call PASCALMAIN@PLT
ret
.p2align 2,,3