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

* Staticlibfilename no longer not include a path. Correction when calling

Browse Source 
ar.
This commit is contained in:
daniel 1998-10-14 11:01:21 +00:00
parent 0c4c29a300
commit 5d506871af
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/link.pas
View File

@ -462,7 +462,7 @@ begin
aktglobalswitches:=aktglobalswitches+[cs_link_extern]; aktglobalswitches:=aktglobalswitches+[cs_link_extern];
end; end;
s:=target_ar.arcmd; s:=target_ar.arcmd;
Replace(s,'$LIB',current_module^.staticlibfilename^); Replace(s,'$LIB',current_module^.path+current_module^.staticlibfilename^);
if filescnt=0 then if filescnt=0 then
Replace(s,'$FILES',current_module^.objfilename^) Replace(s,'$FILES',current_module^.objfilename^)
else else
@ -499,7 +499,11 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.30 1998-10-13 13:10:18 peter Revision 1.31 1998-10-14 11:01:21 daniel
* Staticlibfilename no longer not include a path. Correction when calling
ar.
Revision 1.30 1998/10/13 13:10:18 peter
* new style for m68k/i386 infos and enums * new style for m68k/i386 infos and enums
Revision 1.29 1998/10/13 08:19:34 pierre Revision 1.29 1998/10/13 08:19:34 pierre