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

+ subsetref support

Browse Source 
git-svn-id: trunk@4492 -
This commit is contained in:
Jonas Maebe 2006-08-23 17:59:02 +00:00
parent 0be55cf230
commit 6845c1e05a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/x86/nx86add.pas
View File

@ -239,7 +239,7 @@ unit nx86add;
tmpreg : tregister;
{$endif x86_64}
begin
if (right.location.loc in [LOC_CSUBSETREG,LOC_SUBSETREG]) then
if (right.location.loc in [LOC_CSUBSETREG,LOC_SUBSETREG,LOC_SUBSETREF,LOC_CSUBSETREF]) then
location_force_reg(current_asmdata.CurrAsmList,right.location,def_cgsize(right.resulttype.def),true);
{ left must be a register }
case right.location.loc of