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

* cycle fix.

Browse Source
This commit is contained in:
marco 2004-11-19 14:21:44 +00:00
parent d3cb19214b
commit c1ee8eed7b
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/systems/t_bsd.pas
View File

@ -143,12 +143,13 @@ begin
{ insert sharedlibrary } { insert sharedlibrary }
current_module.linkothersharedlibs.add(SplitName(module),link_allways); current_module.linkothersharedlibs.add(SplitName(module),link_allways);
{ do nothing with the procedure, only set the mangledname } { do nothing with the procedure, only set the mangledname }
if name<>'' then { if name<>'' then
begin begin
aprocdef.setmangledname(name); aprocdef.setmangledname(name);
end end
else else
message(parser_e_empty_import_name); message(parser_e_empty_import_name);
}
end; end;
@ -627,7 +628,10 @@ initialization
end. end.
{ {
$Log$ $Log$
Revision 1.24 2004-11-08 22:09:59 peter Revision 1.25 2004-11-19 14:21:44 marco
* cycle fix.
Revision 1.24 2004/11/08 22:09:59 peter
* tvarsym splitted * tvarsym splitted
Revision 1.23 2004/10/25 15:38:41 peter Revision 1.23 2004/10/25 15:38:41 peter