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

* library list keeps doubles

Browse Source
This commit is contained in:
pierre 1999-10-08 15:38:42 +00:00
parent fd0d2c3781
commit a7992b0232
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
compiler/link.pas
View File

@ -107,8 +107,9 @@ end;
Constructor TLinker.Init;
begin
ObjectFiles.Init_no_double;
SharedLibFiles.Init_no_double;
StaticLibFiles.Init_no_double;
{ libraries sometimes need to be loaded several times PM }
SharedLibFiles.Init{_no_double};
StaticLibFiles.Init{_no_double};
LinkToC:=(cs_link_toc in aktglobalswitches);
Strip:=(cs_link_strip in aktglobalswitches);
LinkOptions:=ParaLinkOptions;
@ -545,6 +546,8 @@ begin
end
else
begin
{ Some times several references to libc are necessary !! PM }
WriteRes(target_link.libprefix+s);
linklibc:=true;
linkdynamic:=false; { C add's it automaticly }
end;
@ -789,7 +792,10 @@ end;
end.
{
$Log$
Revision 1.72 1999-09-16 23:05:52 florian
Revision 1.73 1999-10-08 15:38:42 pierre
* library list keeps doubles
Revision 1.72 1999/09/16 23:05:52 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
Revision 1.71 1999/09/16 11:34:56 pierre