diff --git a/compiler/powerpc/cgcpu.pas b/compiler/powerpc/cgcpu.pas index f07c6cb937..2ebddbb7a4 100644 --- a/compiler/powerpc/cgcpu.pas +++ b/compiler/powerpc/cgcpu.pas @@ -186,8 +186,11 @@ const procedure tcgppc.done_register_allocators; begin rg[R_INTREGISTER].free; + rg[R_INTREGISTER]:=nil; rg[R_FPUREGISTER].free; + rg[R_FPUREGISTER]:=nil; rg[R_MMREGISTER].free; + rg[R_MMREGISTER]:=nil; end; @@ -2314,7 +2317,10 @@ begin end. { $Log$ - Revision 1.148 2003-12-16 21:49:47 florian + Revision 1.149 2003-12-18 01:03:52 florian + + register allocators are set to nil now after they are freed + + Revision 1.148 2003/12/16 21:49:47 florian * fixed ppc compilation Revision 1.147 2003/12/15 21:37:09 jonas