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

+ replace some stuff by ALL_REGISTERS

Browse Source
This commit is contained in:
carl 2002-04-14 16:55:43 +00:00
parent 9ea5003a82
commit f2f6449e6b
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/symdef.pas
View File

@ -3265,7 +3265,7 @@ implementation
end;
lastref:=defref;
{ first, we assume that all registers are used }
usedregisters:=[firstreg..lastreg];
usedregisters:=ALL_REGISTERS;
forwarddef:=true;
interfacedef:=false;
hasforward:=false;
@ -3368,7 +3368,7 @@ implementation
{ set all registers to used for simplified compilation PM }
if simplify_ppu then
begin
usedregisters:=[firstreg..lastreg];
usedregisters:=ALL_REGISTERS;
end;
ppufile.putnormalset(usedregisters);
@ -5419,7 +5419,10 @@ implementation
end.
{
$Log$
Revision 1.68 2002-04-02 17:11:29 peter
Revision 1.69 2002-04-14 16:55:43 carl
+ replace some stuff by ALL_REGISTERS
Revision 1.68 2002/04/02 17:11:29 peter
* tlocation,treference update
* LOC_CONSTANT added for better constant handling
* secondadd splitted in multiple routines