瀏覽代碼

* Fixed incorrect condition (a linked list always has at least one dummy element) which was causing every unit to have a threadvar table, regardless of actual presence of threadvars. For units without code, this was causing creation of .o files which aren't necessary otherwise.

git-svn-id: trunk@23201 -
sergei 12 年之前
父節點
當前提交
1116bc3542
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/ngenutil.pas

+ 1 - 1
compiler/ngenutil.pas

@@ -705,7 +705,7 @@ implementation
        if assigned(current_module.globalsymtable) then
          current_module.globalsymtable.SymList.ForEachCall(@AddToThreadvarList,ltvTable);
        current_module.localsymtable.SymList.ForEachCall(@AddToThreadvarList,ltvTable);
-       if ltvTable.first<>nil then
+       if not ltvTable.Empty then
         begin
           s:=make_mangledname('THREADVARLIST',current_module.localsymtable,'');
           { end of the list marker }