瀏覽代碼

Renamed DisposeAndNil to FreeMemAndNil

git-svn-id: trunk@33378 -
michael 9 年之前
父節點
當前提交
3e96806f7e
共有 2 個文件被更改,包括 2 次插入2 次删除
  1. 1 1
      rtl/objpas/sysutils/sysutilh.inc
  2. 1 1
      rtl/objpas/sysutils/sysutils.inc

+ 1 - 1
rtl/objpas/sysutils/sysutilh.inc

@@ -321,7 +321,7 @@ Type
   {$ENDIF}
   
   procedure FreeAndNil(var obj);
-  procedure DisposeAndNil(var p);
+  procedure FreeMemAndNil(var p);
 
   { interface handling }
   {$i intfh.inc}

+ 1 - 1
rtl/objpas/sysutils/sysutils.inc

@@ -162,7 +162,7 @@ end;
         temp.free;
       end;
 
-    procedure DisposeAndNil(var p);
+    procedure FreeMemAndNil(var p);
     
     var
       temp:Pointer;