From d66fdc645ad15dc21a0cf02a527a776a60188a9f Mon Sep 17 00:00:00 2001 From: florian Date: Wed, 4 Aug 1999 14:21:07 +0000 Subject: [PATCH] * now every available fpu register is used for fpu register variables --- compiler/pass_2.pas | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/compiler/pass_2.pas b/compiler/pass_2.pas index 045e5f9352..ffe231ccf4 100644 --- a/compiler/pass_2.pas +++ b/compiler/pass_2.pas @@ -578,7 +578,7 @@ implementation symtablestack^.next^.foreach({$ifndef TP}@{$endif}searchregvars); {$endif dummy} { hold needed registers free } - for i:=maxvarregs downto maxvarregs-p^.registersfpu+1 do + for i:=maxfpuvarregs downto maxfpuvarregs-p^.registersfpu+1 do regvars[i]:=nil; { now assign register } for i:=1 to maxfpuvarregs-p^.registersfpu do @@ -610,6 +610,9 @@ implementation {$endif dummy} end; end; + if cs_asm_source in aktglobalswitches then + procinfo.aktentrycode^.insert(new(pai_asm_comment,init(strpnew(tostr(p^.registersfpu)+ + ' registers on FPU stack used by temp. expressions')))); for i:=1 to maxfpuvarregs do begin if assigned(regvars[i]) then @@ -645,7 +648,11 @@ implementation end. { $Log$ - Revision 1.29 1999-08-04 13:45:28 florian + Revision 1.30 1999-08-04 14:21:07 florian + * now every available fpu register is used for + fpu register variables + + Revision 1.29 1999/08/04 13:45:28 florian + floating point register variables !! * pairegalloc is now generated for register variables