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

* Fixed an illegal use of makeregsize

Browse Source
This commit is contained in:
daniel 2003-02-26 23:06:13 +00:00
parent 0815444fb5
commit af4b350879
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/i386/n386set.pas
View File

@ -392,7 +392,8 @@ implementation
LOC_REGISTER, LOC_REGISTER,
LOC_CREGISTER: LOC_CREGISTER:
begin begin
hr:=rg.makeregsize(left.location.register,OS_INT); hr.enum:=R_INTREGISTER;
hr.number:=(left.location.register.number and not $ff) or R_SUBWHOLE;
cg.a_load_reg_reg(exprasmlist,left.location.size,OS_INT,left.location.register,hr); cg.a_load_reg_reg(exprasmlist,left.location.size,OS_INT,left.location.register,hr);
end; end;
else else
@ -719,7 +720,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.49 2003-02-19 22:39:56 daniel Revision 1.50 2003-02-26 23:06:13 daniel
* Fixed an illegal use of makeregsize
Revision 1.49 2003/02/19 22:39:56 daniel
* Fixed a few issues * Fixed a few issues
Revision 1.48 2003/02/19 22:00:15 daniel Revision 1.48 2003/02/19 22:00:15 daniel