Browse Source

* updated TTarget.GetUnitLibFileName according to the settings for staticlibext
and staticlibprefix for each target, supported by FPC

git-svn-id: trunk@25649 -

nickysn 12 years ago
parent
commit
f1c1ea17fa
1 changed files with 10 additions and 1 deletions
  1. 10 1
      packages/fpmkunit/src/fpmkunit.pp

+ 10 - 1
packages/fpmkunit/src/fpmkunit.pp

@@ -7127,7 +7127,16 @@ end;
 
 function TTarget.GetUnitLibFileName(AOS : TOS): String;
 begin
-  Result:='libp'+Name+LibExt;
+  if AOS in [atari,netwlibc,go32v2,watcom,wdosx,msdos] then
+    Result := Name+LibExt
+  else if AOS in [amiga,morphos] then
+    Result:='lib'+Name+LibExt
+  else if AOS in [java] then
+    Result:=Name+'.jar'
+  else if AOS in [macos] then
+    Result:=Name+'Lib'
+  else
+    Result:='libp'+Name+LibExt;
 end;
 
 procedure TTarget.SetOptions(const AValue: TStrings);