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

* write also the .dll extension (needed for NT)

Browse Source
This commit is contained in:
peter 1998-06-10 10:43:18 +00:00
parent d449884787
commit 7d36b5d9ec
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/win_targ.pas
View File

@ -38,7 +38,7 @@ unit win_targ;
implementation
uses
aasm,files,strings,globals,cobjects
aasm,files,strings,globals,cobjects,systems
{$ifdef GDB}
,gdb
{$endif}
@ -170,7 +170,7 @@ unit win_targ;
{ create import dll name }
importssection^.concat(new(pai_section,init_idata(7)));
importssection^.concat(new(pai_label,init(l1)));
importssection^.concat(new(pai_string,init(hp1^.dllname^+#0)));
importssection^.concat(new(pai_string,init(hp1^.dllname^+target_os.sharedlibext+#0)));
hp1:=pimportlist(hp1^.next);
end;
@ -179,7 +179,10 @@ unit win_targ;
end.
{
$Log$
Revision 1.4 1998-06-08 22:59:56 peter
Revision 1.5 1998-06-10 10:43:18 peter
* write also the .dll extension (needed for NT)
Revision 1.4 1998/06/08 22:59:56 peter
* smartlinking works for win32
* some defines to exclude some compiler parts