浏览代码

Do not check whether all units are used as by definition all units of a package are considered as used.

pmodules.pas, proc_package:
  - remove call to current_module.allunitsused

git-svn-id: branches/svenbarth/packages@31992 -
svenbarth 9 年之前
父节点
当前提交
1d4b105f01
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/pmodules.pas

+ 1 - 1
compiler/pmodules.pas

@@ -1527,7 +1527,7 @@ type
              tstoredsymtable(current_module.localsymtable).allprivatesused;
              tstoredsymtable(current_module.localsymtable).check_forwards;
 
-             current_module.allunitsused;
+             { Note: all contained units are considered as used }
            end;
 
          if target_info.system in systems_windows then