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

* fix reg-supreg range check error

Browse Source
This commit is contained in:
peter 2003-08-21 14:48:36 +00:00
parent 8cf0c122f4
commit b9afdc6a36
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/x86/aasmcpu.pas
View File

@ -2231,7 +2231,7 @@ implementation
op:=opcode;
opcode:=A_MOV;
opsize:=reg2opsize(oper[1].reg);
pos:=get_insert_pos(Tai(previous),oper[0].reg.number,0,0,unusedregsint);
pos:=get_insert_pos(Tai(previous),oper[0].reg.number shr 8,0,0,unusedregsint);
rgget(list,pos,subreg,helpreg);
helpins:=Taicpu.op_reg_reg(op,hopsize,oper[0].reg,helpreg);
if pos=nil then
@ -2395,7 +2395,10 @@ implementation
end.
{
$Log$
Revision 1.14 2003-08-20 16:52:01 daniel
Revision 1.15 2003-08-21 14:48:36 peter
* fix reg-supreg range check error
Revision 1.14 2003/08/20 16:52:01 daniel
* Some old register convention code removed
* A few changes to eliminate a few lines of code