瀏覽代碼

* NeedResolving must be freed

git-svn-id: trunk@10581 -
michael 17 年之前
父節點
當前提交
61fb196c73
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/objpas/classes/classes.inc

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

@@ -1680,7 +1680,7 @@ begin
   DoneCriticalsection(ResolveSection);
   GlobalLists.Free;
   ComponentPages.Free;
-
+  FreeAndNil(NeedResolving);
   { GlobalNameSpace is an interface so this is enough }
   GlobalNameSpace:=nil;