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

* Use rip-relative offsets in assembler, fixes linking text mode IDE with internal linker. The better way would be to get rid of this assembler altogether.

Browse Source 
git-svn-id: trunk@19149 -
This commit is contained in:
sergei 2011-09-19 15:18:28 +00:00
parent 8b0cb2c1d5
commit 6f20627220
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/win/video.pp
View File

@ -578,9 +578,9 @@ begin
pushq %rsi pushq %rsi
pushq %rdi pushq %rdi
xorq %rcx,%rcx xorq %rcx,%rcx
movq VideoBuf,%rsi movq VideoBuf(%rip),%rsi
movq OldVideoBuf,%rdi movq OldVideoBuf(%rip),%rdi
movl VideoBufSize,%ecx movl VideoBufSize(%rip),%ecx
shrq $2,%rcx shrq $2,%rcx
repe repe
cmpsl cmpsl