git-svn-id: trunk@44033 - (cherry picked from commit 3cd4168ab3412952166fe730cf6594fdc3c05fae)
@@ -18,6 +18,7 @@
type
THandle = Longint;
TThreadID = Cardinal;
+ TOSTimestamp = Int64;
PRTLCriticalSection = ^TRTLCriticalSection;
TRTLCriticalSection = record
@@ -19,6 +19,7 @@
THandle = PtrInt;
TThreadID = THandle;
+ TOSTimestamp = Longint;
@@ -23,7 +23,8 @@ type
{$endif CPU64}
-
+
Locked: boolean
@@ -20,7 +20,8 @@ type
{ fd are int in C also for 64bit targets (x86_64) }
{ pthread_mutex_t }
@@ -21,7 +21,8 @@ type
TThreadRec = record end;
TThreadID = ^TThreadRec;
TRTLCriticalSection = {$i pmutext.inc}
@@ -25,6 +25,7 @@ type
{$else}
{$endif}
@@ -18,9 +18,9 @@
{Platform specific information}
TThreadID = cardinal;
{ the fields of this record are os dependent }
{ and they shouldn't be used in a program }
{ only the type TCriticalSection is important }
@@ -19,7 +19,8 @@
@@ -16,6 +16,8 @@
}
FpcRunTimeError = class(JLException)
errornr: longint;
constructor create(l: longint);
@@ -23,6 +23,8 @@ type
{ pthread_t is defined as an "unsigned long" }
TThreadID = PtrUInt;
{$macro on}
{$define MUTEXTYPENAME := TRTLCriticalSection}
@@ -21,11 +21,12 @@ type
- PRTLCriticalSection = ^TRTLCriticalSection;
- TRTLCriticalSection = record
- Locked: boolean
- end;
+ PRTLCriticalSection = ^TRTLCriticalSection;
+ TRTLCriticalSection = record
+ Locked: boolean
+ end;
@@ -19,8 +19,10 @@
THandle = Word;
@@ -17,6 +17,7 @@
THandle = PtrUInt;
THandle = DWord;
@@ -18,7 +18,8 @@
TRTLCriticalSection = packed record
mutex : pointer;
@@ -21,6 +21,7 @@ type
@@ -24,6 +24,7 @@ type
TThreadID = DWord;
SIZE_T = ULONG_PTR;