paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-06 15:47:41 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Replaced 'movzbl %r8b, %r8' because it is rejected by GAS (suffix does not match the operand size). The correct instruction is 'movzbq %r8b, %r8' but that one is rejected by FPC reader instead. Provides a fix for broken builds of targets using external assembler (Mantis #19188).

Browse Source 
git-svn-id: trunk@17339 -
This commit is contained in:
sergei 2011-04-18 13:31:07 +00:00
parent 46d50c9ebc
commit e1616fd8ef
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/x86_64/x86_64.inc
View File

@ -365,8 +365,16 @@ Procedure FillChar(var x;count:SizeInt;value:byte);assembler;nostackframe;
cmp $8, %rdx
jl .Ltiny
// TODO: movz?q and movs?q are not accepted by FPC asmreader, it needs fixing.
// `movzbl' instead is accepted and generates correct code with internal assembler,
// but breaks targets using external GAS (Mantis #19188).
// So use a different instruction for now.
{ expand byte value }
movzbl %r8b, %r8
andq $0xffffffffffffff00, %r8
{
movzbq %r8b, %r8
}
mov $0x0101010101010101,%r9
imul %r9, %r8