浏览代码

Fix previous.

Martijn Laan 4 月之前
父节点
当前提交
c29e929667
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      Projects/Src/Compiler.SetupCompiler.pas

+ 1 - 0
Projects/Src/Compiler.SetupCompiler.pas

@@ -4841,6 +4841,7 @@ type
         if NewFileLocationEntry = nil then begin
           NewFileLocationEntry := AllocMem(SizeOf(TSetupFileLocationEntry));
           New(NewFileLocationEntryExtraInfo);
+          FillChar(NewFileLocationEntryExtraInfo^, SizeOf(TFileLocationEntryExtraInfo), 0);
           SetupHeader.CompressMethod := CompressMethod;
           FileLocationEntries.Add(NewFileLocationEntry);
           FileLocationEntryExtraInfos.Add(NewFileLocationEntryExtraInfo);