From 1d58b572b575303bfa218835db831a52ad1f269e Mon Sep 17 00:00:00 2001
From: yury <jura@cp-lab.com>
Date: Sun, 5 Mar 2006 20:44:23 +0000
Subject: [PATCH] * Changed Win32 DLL entry point names (removed @12 at the
 end).

git-svn-id: trunk@2770 -
---
 compiler/systems/t_win.pas | 4 ++--
 rtl/win32/system.pp        | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/compiler/systems/t_win.pas b/compiler/systems/t_win.pas
index 8f3ad51fac..e69a1e71af 100644
--- a/compiler/systems/t_win.pas
+++ b/compiler/systems/t_win.pas
@@ -1152,10 +1152,10 @@ begin
   if apptype=app_gui then
     begin
       AppTypeStr:='--subsystem windows';
-      EntryStr:='--entry _DLLWinMainCRTStartup@12'
+      EntryStr:='--entry _DLLWinMainCRTStartup'
     end
   else
-    EntryStr:='--entry _DLLMainCRTStartup@12';
+    EntryStr:='--entry _DLLMainCRTStartup';
   if assigned(DLLImageBase) then
     ImageBaseStr:='--image-base=0x'+DLLImageBase^;
   if (cs_link_strip in aktglobalswitches) then
diff --git a/rtl/win32/system.pp b/rtl/win32/system.pp
index 4ac884a823..d02c84863a 100644
--- a/rtl/win32/system.pp
+++ b/rtl/win32/system.pp
@@ -513,7 +513,7 @@ begin
 end;
 
 
-procedure _FPC_DLLMainCRTStartup(_hinstance,_dllreason,_dllparam:longint);stdcall;public name '_DLLMainCRTStartup@12';
+procedure _FPC_DLLMainCRTStartup(_hinstance,_dllreason,_dllparam:longint);stdcall;public name '_DLLMainCRTStartup';
 begin
   IsConsole:=true;
   sysinstance:=_hinstance;
@@ -523,7 +523,7 @@ begin
 end;
 
 
-procedure _FPC_DLLWinMainCRTStartup(_hinstance,_dllreason,_dllparam:longint);stdcall;public name '_DLLWinMainCRTStartup@12';
+procedure _FPC_DLLWinMainCRTStartup(_hinstance,_dllreason,_dllparam:longint);stdcall;public name '_DLLWinMainCRTStartup';
 begin
   IsConsole:=false;
   sysinstance:=_hinstance;