paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 01:48:00 +02:00
Code Issues Packages Projects Releases Wiki Activity

* move setup of secrec outside of the if-statement as it's the same for both cases

Browse Source
This commit is contained in:
Sven/Sarah Barth 2024-06-07 15:31:58 +02:00
parent f5beaa80d8
commit c2664fdfa5
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/ogcoff.pas
View File

@ -2551,16 +2551,14 @@ const pemagic : array[0..3] of byte = (
begin
FCoffSyms.Read(boauxrec,sizeof(boauxrec));
psecrec:=pcoffsectionrec(@boauxrec[0]);
secrec:=psecrec^;
MaybeSwap(secrec);
end
else
begin
FCoffSyms.Read(auxrec,sizeof(auxrec));
psecrec:=pcoffsectionrec(@auxrec);
secrec:=psecrec^;
MaybeSwap(secrec);
end;
secrec:=psecrec^;
MaybeSwap(secrec);
case secrec.select of
IMAGE_COMDAT_SELECT_NODUPLICATES: