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

* warnings about FreeTemp already free fixed with appropriate registers handling

Browse Source
This commit is contained in:
mazen 2003-01-05 20:39:53 +00:00
parent 8507582b85
commit c419956367
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
compiler/sparc/cpubase.pas
View File

@ -351,8 +351,8 @@ used, because contains a lot of unnessary fields.}
Constants
*****************************************************************************}
CONST
general_registers = [R_L0..R_L7];
const
general_registers = [R_G0..R_I7];
{ legEND: }
{ xxxregs = set of all possibly used registers of that type in the code }
{ generator }
@ -371,11 +371,11 @@ CONST
usableregsmm=[];
c_countusableregsmm=8;
firstsaveintreg = R_G0;
firstsaveintreg = R_I0;
lastsaveintreg = R_I7;
firstsavefpureg = R_F0;
lastsavefpureg = R_F31;
firstsavemmreg = R_G0;
firstsavemmreg = R_I0;
lastsavemmreg = R_I7;
lowsavereg = R_G0;
highsavereg = R_I7;
@ -523,7 +523,10 @@ function flags_to_cond(const f:TResFlags):TAsmCond;
END.
{
$Log$
Revision 1.16 2002-10-28 20:59:17 mazen
Revision 1.17 2003-01-05 20:39:53 mazen
* warnings about FreeTemp already free fixed with appropriate registers handling
Revision 1.16 2002/10/28 20:59:17 mazen
* TOpSize values changed S_L --> S_SW
Revision 1.15 2002/10/28 20:37:44 mazen