From 40c11baaaca151271e95ba91ea6973de369f5bb0 Mon Sep 17 00:00:00 2001 From: svenbarth Date: Thu, 21 Nov 2019 21:45:18 +0000 Subject: [PATCH] * use a different name for the packages' entry point and use _DLLMainCRTStartup as an alias to avoid problems with the C-prefix git-svn-id: trunk@43551 - --- compiler/pmodules.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/compiler/pmodules.pas b/compiler/pmodules.pas index a285bfe663..cc5e0afc4f 100644 --- a/compiler/pmodules.pas +++ b/compiler/pmodules.pas @@ -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;