소스 검색

* initialize boheader to avoid a warning

git-svn-id: trunk@35392 -
svenbarth 8 년 전
부모
커밋
7af52f81a7
1개의 변경된 파일1개의 추가작업 그리고 0개의 파일을 삭제
  1. 1 0
      compiler/ogcoff.pas

+ 1 - 0
compiler/ogcoff.pas

@@ -1989,6 +1989,7 @@ const pemagic : array[0..3] of byte = (
         InputFileName:=AReader.FileName;
         objdata:=CObjData.Create(InputFileName);
         result:=false;
+        boheader:=default(tcoffbigobjheader);
         FCoffSyms:=TDynamicArray.Create(SymbolMaxGrow);
         with TCoffObjData(objdata) do
          begin