Browse Source

Renamed DisposeAndNil to FreeMemAndNil

git-svn-id: trunk@33378 -
michael 9 years ago
parent
commit
3e96806f7e
2 changed files with 2 additions and 2 deletions
  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}
   {$ENDIF}
   
   
   procedure FreeAndNil(var obj);
   procedure FreeAndNil(var obj);
-  procedure DisposeAndNil(var p);
+  procedure FreeMemAndNil(var p);
 
 
   { interface handling }
   { interface handling }
   {$i intfh.inc}
   {$i intfh.inc}

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

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