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

* use a different name for the packages' entry point and use _DLLMainCRTStartup as an alias to avoid problems with the C-prefix

Browse Source 
git-svn-id: trunk@43551 -
This commit is contained in:
svenbarth 2019-11-21 21:45:18 +00:00
parent bb3b1b06a7
commit 40c11baaac
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/pmodules.pas
View File

@ -1748,7 +1748,8 @@ type
if target_info.system in systems_all_windows+systems_nativent then
begin
main_procinfo:=create_main_proc('_DLLMainCRTStartup',potype_pkgstub,current_module.localsymtable);
main_procinfo:=create_main_proc('_PkgEntryPoint',potype_pkgstub,current_module.localsymtable);
main_procinfo.procdef.aliasnames.concat('_DLLMainCRTStartup');
main_procinfo.code:=generate_pkg_stub(main_procinfo.procdef);
main_procinfo.generate_code;
end;