paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 18:19:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

* restored old default values for MajorOperatingSystemVersion, MajorSubsystemVersion and MinorSubsystemVersion, resolves issue #32492

Browse Source 
git-svn-id: trunk@37381 -
This commit is contained in:
florian 2017-10-01 21:02:37 +00:00
parent 7817102727
commit 99a3855e6b
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/ogcoff.pas
View File

@ -2628,7 +2628,7 @@ const pemagic : array[0..3] of byte = (
end end
else else
begin begin
peoptheader.MajorOperatingSystemVersion:=10; peoptheader.MajorOperatingSystemVersion:=4;
peoptheader.MinorOperatingSystemVersion:=0; peoptheader.MinorOperatingSystemVersion:=0;
end; end;
if SetPEUserVersionSetExplicitely then if SetPEUserVersionSetExplicitely then
@ -2651,8 +2651,8 @@ const pemagic : array[0..3] of byte = (
if target_info.system in systems_wince then if target_info.system in systems_wince then
peoptheader.MajorSubsystemVersion:=3 peoptheader.MajorSubsystemVersion:=3
else else
peoptheader.MajorSubsystemVersion:=6; peoptheader.MajorSubsystemVersion:=4;
peoptheader.MinorSubsystemVersion:=2; peoptheader.MinorSubsystemVersion:=0;
end; end;
peoptheader.Win32Version:=0; peoptheader.Win32Version:=0;
peoptheader.SizeOfImage:=Align(CurrMemPos,SectionMemAlign); peoptheader.SizeOfImage:=Align(CurrMemPos,SectionMemAlign);