paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-02-21 09:01:21 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fix IE2003042401 when assigning booleans to bitpacked arrays, fixes tw7379

Browse Source 
git-svn-id: trunk@5044 -
This commit is contained in:
tom_at_work 2006-10-28 20:18:23 +00:00
parent ab3c173479
commit 9fc11fc5dc
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/powerpc64/nppcmat.pas
View File

@ -354,7 +354,10 @@ begin
location_copy(location, left.location);
inverse_flags(location.resflags);
end;
LOC_REGISTER, LOC_CREGISTER, LOC_REFERENCE, LOC_CREFERENCE:
LOC_REGISTER, LOC_CREGISTER,
LOC_REFERENCE, LOC_CREFERENCE,
LOC_SUBSETREG, LOC_CSUBSETREG,
LOC_SUBSETREF, LOC_CSUBSETREF:
begin
location_force_reg(current_asmdata.CurrAsmList, left.location,
def_cgsize(left.resulttype.def), true);