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

* fixed loadaddr; I wonder how it ever worked

Browse Source
This commit is contained in:
florian 2005-01-08 16:00:55 +00:00
parent a3559cc712
commit cf55930118
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/x86/cgx86.pas
View File

@ -624,7 +624,11 @@ unit cgx86;
if (base=NR_NO) and (index=NR_NO) then if (base=NR_NO) and (index=NR_NO) then
begin begin
if assigned(ref.symbol) then if assigned(ref.symbol) then
list.concat(Taicpu.op_sym_ofs_reg(A_MOV,tcgsize2opsize[OS_ADDR],symbol,offset,r)) begin
tmpref:=ref;
tmpref.refaddr:=ADDR_FULL;
list.concat(Taicpu.op_ref_reg(A_MOV,tcgsize2opsize[OS_ADDR],tmpref,r));
end
else else
a_load_const_reg(list,OS_ADDR,offset,r); a_load_const_reg(list,OS_ADDR,offset,r);
end end
@ -1735,7 +1739,10 @@ unit cgx86;
end. end.
{ {
$Log$ $Log$
Revision 1.140 2004-12-12 10:50:35 florian Revision 1.141 2005-01-08 16:00:55 florian
* fixed loadaddr; I wonder how it ever worked
Revision 1.140 2004/12/12 10:50:35 florian
* fixed operand size calculation for sse operands * fixed operand size calculation for sse operands
+ all nasm assembler targets to help page output added + all nasm assembler targets to help page output added