瀏覽代碼

+ register allocators are set to nil now after they are freed

florian 21 年之前
父節點
當前提交
7bd24b32c3
共有 1 個文件被更改,包括 7 次插入1 次删除
  1. 7 1
      compiler/powerpc/cgcpu.pas

+ 7 - 1
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