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

+ added missing make_simple_ref

Browse Source 
git-svn-id: trunk@1572 -
This commit is contained in:
florian 2005-10-23 13:28:43 +00:00
parent 076e4aca99
commit 1b97e2cffd
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/x86/cgx86.pas
View File

@ -934,7 +934,10 @@ unit cgx86;
internalerror(200312215); internalerror(200312215);
case loc.loc of case loc.loc of
LOC_CREFERENCE,LOC_REFERENCE: LOC_CREFERENCE,LOC_REFERENCE:
list.concat(taicpu.op_ref_reg(asmop,S_NO,loc.reference,resultreg)); begin
make_simple_ref(exprasmlist,loc.reference);
list.concat(taicpu.op_ref_reg(asmop,S_NO,loc.reference,resultreg));
end;
LOC_CMMREGISTER,LOC_MMREGISTER: LOC_CMMREGISTER,LOC_MMREGISTER:
list.concat(taicpu.op_reg_reg(asmop,S_NO,loc.register,resultreg)); list.concat(taicpu.op_reg_reg(asmop,S_NO,loc.register,resultreg));
else else