paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-18 14:50:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed import crash with explicit provided name

Browse Source
This commit is contained in:
peter 2003-05-13 15:15:25 +00:00
parent fd632f7a50
commit ff172b6b2d
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_win32.pas
View File

@ -149,7 +149,8 @@ const
NN : longint;
begin
{ force the current mangledname }
aprocdef.has_mangledname:=true;
if assigned(aprocdef) then
aprocdef.has_mangledname:=true;
{ append extension if required }
GetDefExt(NN,PP);
hs:=DllName(module,NN,PP);
@ -1628,7 +1629,10 @@ initialization
end.
{
$Log$
Revision 1.15 2003-04-27 09:14:48 florian
Revision 1.16 2003-05-13 15:15:25 peter
* fixed import crash with explicit provided name
Revision 1.15 2003/04/27 09:14:48 florian
* aprocdef instead of aktprocdef must be used
Revision 1.14 2003/04/27 07:29:52 peter