paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 11:29:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

- Removed outdated FPC_HAS_RIP_RELATIVE defines, these seem to be the last ones in RTL.

Browse Source 
git-svn-id: trunk@19464 -
This commit is contained in:
sergei 2011-10-11 09:11:32 +00:00
parent 4a3c7f7ef4
commit 9df8be501a
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/solaris/x86_64/start.inc
View File

@ -214,7 +214,7 @@ asm
movq _environ@GOTPCREL(%rip),%rcx
movq (%rcx),%rcx
{$else FPC_PIC}
movq _environ{$ifdef FPC_HAS_RIP_RELATIVE}(%rip){$endif},%rcx
movq _environ(%rip),%rcx
{$endif FPC_PIC}
testq %rcx,%rcx
jne .Label3
@ -224,14 +224,14 @@ asm
movq _environ@GOTPCREL(%rip),%rbx
movq %rcx,(%rbx)
{$else FPC_PIC}
movq %rcx,_environ{$ifdef FPC_HAS_RIP_RELATIVE}(%rip){$endif}
movq %rcx,_environ(%rip)
{$endif FPC_PIC}
// Specific to Free Pascal
{$ifdef FPC_PIC}
movq envp@GOTPCREL(%rip),%rbx
movq %rcx,(%rbx)
{$else FPC_PIC}
movq %rcx,envp{$ifdef FPC_HAS_RIP_RELATIVE}(%rip){$endif}
movq %rcx,envp(%rip)
{$endif FPC_PIC}
(*
@ -247,7 +247,7 @@ asm
movq ___Argv@GOTPCREL(%rip),%rbx
movq %rdx,(%rbx)
{$else FPC_PIC}
movq %rdx,___Argv{$ifdef FPC_HAS_RIP_RELATIVE}(%rip){$endif}
movq %rdx,___Argv(%rip)
{$endif FPC_PIC}
{$ifdef FPC_PIC}
movq argv@GOTPCREL(%rip),%rbx