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

* Converted user defined warnings to comments.

Browse Source 
git-svn-id: trunk@9545 -
This commit is contained in:
yury 2007-12-27 22:22:36 +00:00
parent ff78a443db
commit de9af7191b
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/win32/system.pp
View File

@ -446,7 +446,7 @@ function Dll_entry(const info : TEntryInformation) : longbool; [public,alias:'_F
DLL_THREAD_ATTACH :
begin
inclocked(Thread_count);
{$warning Allocate Threadvars !}
{ Allocate Threadvars ?!}
if assigned(Dll_Thread_Attach_Hook) then
Dll_Thread_Attach_Hook(DllParam);
Dll_entry:=true; { return value is ignored }
@ -456,7 +456,7 @@ function Dll_entry(const info : TEntryInformation) : longbool; [public,alias:'_F
declocked(Thread_count);
if assigned(Dll_Thread_Detach_Hook) then
Dll_Thread_Detach_Hook(DllParam);
{$warning Release Threadvars !}
{ Release Threadvars ?!}
Dll_entry:=true; { return value is ignored }
end;
DLL_PROCESS_DETACH :