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

* fixed include() with smallsets

Browse Source
This commit is contained in:
Jonas Maebe 1999-06-21 16:33:27 +00:00
parent eed51e6bd5
commit 9ca18fc55b
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/cg386inl.pas
View File

@ -1224,10 +1224,10 @@ implementation
end;
if (p^.left^.left^.location.loc=LOC_REFERENCE) then
exprasmlist^.concat(new(pai386,op_reg_ref(asmop,S_L,hregister,
newreference(p^.left^.right^.left^.location.reference))))
newreference(p^.left^.left^.location.reference))))
else
exprasmlist^.concat(new(pai386,op_reg_reg(asmop,S_L,hregister,
p^.left^.right^.left^.location.register)));
p^.left^.left^.location.register)));
end
else
begin
@ -1251,7 +1251,10 @@ implementation
end.
{
$Log$
Revision 1.58 1999-06-11 11:44:56 peter
Revision 1.59 1999-06-21 16:33:27 jonas
* fixed include() with smallsets
Revision 1.58 1999/06/11 11:44:56 peter
*** empty log message ***
Revision 1.57 1999/06/02 10:11:43 florian