paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-01 00:39:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed r1347

Browse Source 
git-svn-id: branches/fixes_2_0@1348 -
This commit is contained in:
peter 2005-10-10 08:57:39 +00:00
parent 85217a9203
commit 17bca24e0c
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
rtl/win32/systhrd.inc
View File

@ -24,6 +24,11 @@ const
LMEM_FIXED = 0; LMEM_FIXED = 0;
LMEM_ZEROINIT = 64; LMEM_ZEROINIT = 64;
KernelDLL = 'kernel32.dll';
type
SIZE_T = dword;
{$ifndef WINCE} {$ifndef WINCE}
function TlsAlloc : DWord; function TlsAlloc : DWord;
stdcall;external KernelDLL name 'TlsAlloc'; stdcall;external KernelDLL name 'TlsAlloc';