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

* fixed load_ref_reg for source > dest size

Browse Source
This commit is contained in:
Jonas Maebe 2003-12-05 22:53:28 +00:00
parent c1095adab4
commit 8cb716ca56
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/powerpc/cgcpu.pas
View File

@ -523,7 +523,7 @@ const
freereg := fixref(list,ref2);
{ the caller is expected to have adjusted the reference already }
{ in this case }
if (fromsize > tosize) then
if (TCGSize2Size[fromsize] > TCGSize2Size[tosize]) then
fromsize := tosize;
op := loadinstr[fromsize,ref2.index<>NR_NO,false];
a_load_store(list,op,reg,ref2);
@ -2451,7 +2451,10 @@ begin
end.
{
$Log$
Revision 1.140 2003-12-04 20:37:02 jonas
Revision 1.141 2003-12-05 22:53:28 jonas
* fixed load_ref_reg for source > dest size
Revision 1.140 2003/12/04 20:37:02 jonas
* fixed some int<->boolean type conversion issues
Revision 1.139 2003/11/30 11:32:12 jonas