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

* Determine if a 8.3-target-string should be used based on host-os, not the target-os, since the Makefiles and compiler do the same.

Browse Source 
git-svn-id: trunk@28951 -
This commit is contained in:
joost 2014-10-31 12:59:47 +00:00
parent 3530328cfd
commit c4492a711f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fpmkunit/src/fpmkunit.pp
View File

@ -2123,7 +2123,7 @@ end;
Function MakeTargetString(CPU : TCPU;OS: TOS) : String;
begin
if OS in AllLimit83fsOses then
if Defaults.BuildOS in AllLimit83fsOses then
Result := OSToString(OS)
else
Result:=CPUToString(CPU)+'-'+OSToString(OS);
@ -6408,7 +6408,7 @@ begin
if APackage.BuildMode=bmBuildUnit then
begin
APackage.FBUTargets := TTargets.Create(TTarget);
if Defaults.OS in AllLimit83fsOses then
if Defaults.BuildOS in AllLimit83fsOses then
BUName := 'BUnit.pp'
else
BUName := 'BuildUnit_'+StringReplace(APackage.Name,'-','_',[rfReplaceAll])+'.pp';