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

* fixed bug in a_load_loc_ref (the source instead of dest size was passed

Browse Source 
to a_load_reg_ref in case of a register)
This commit is contained in:
Jonas Maebe 2003-05-30 21:40:00 +00:00
parent 820302b098
commit 0c717891ff
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/cgobj.pas
View File

@ -823,7 +823,7 @@ unit cgobj;
begin begin
case loc.loc of case loc.loc of
LOC_REFERENCE,LOC_CREFERENCE: LOC_REFERENCE,LOC_CREFERENCE:
a_load_reg_ref(list,size,reg,loc.reference); a_load_reg_ref(list,loc.size,reg,loc.reference);
LOC_REGISTER,LOC_CREGISTER: LOC_REGISTER,LOC_CREGISTER:
a_load_reg_reg(list,size,loc.size,reg,loc.register); a_load_reg_reg(list,size,loc.size,reg,loc.register);
else else
@ -1691,7 +1691,11 @@ finalization
end. end.
{ {
$Log$ $Log$
Revision 1.100 2003-05-30 12:36:13 jonas Revision 1.101 2003-05-30 21:40:00 jonas
* fixed bug in a_load_loc_ref (the source instead of dest size was passed
to a_load_reg_ref in case of a register)
Revision 1.100 2003/05/30 12:36:13 jonas
* use as little different registers on the ppc until newra is released, * use as little different registers on the ppc until newra is released,
since every used register must be saved since every used register must be saved