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

* compile fix for no-newra

Browse Source
This commit is contained in:
peter 2003-04-23 20:23:06 +00:00
parent c21ca3dfa0
commit c351d2a524
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/rgobj.pas
View File

@ -593,7 +593,7 @@ unit rgobj;
procedure trgobj.ungetregistergenint(list:taasmoutput;const r:Tregister; procedure trgobj.ungetregistergenint(list:taasmoutput;const r:Tregister;
const usableregs:Tsupregset; const usableregs:Tsupregset;
var unusedregs:Tsupregset var unusedregs:Tsupregset
{$ifndef newra}var countunusedregs:byte{$endif}); {$ifndef newra};var countunusedregs:byte{$endif});
var supreg:Tsuperregister; var supreg:Tsuperregister;
@ -2001,7 +2001,10 @@ end.
{ {
$Log$ $Log$
Revision 1.38 2003-04-23 14:42:07 daniel Revision 1.39 2003-04-23 20:23:06 peter
* compile fix for no-newra
Revision 1.38 2003/04/23 14:42:07 daniel
* Further register allocator work. Compiler now smaller with new * Further register allocator work. Compiler now smaller with new
allocator than without. allocator than without.
* Somebody forgot to adjust ppu version number * Somebody forgot to adjust ppu version number