فهرست منبع

+ introduce TOSTimestamp

git-svn-id: trunk@44033 -
florian 5 سال پیش
والد
کامیت
3cd4168ab3

+ 1 - 0
rtl/aix/sysosh.inc

@@ -18,6 +18,7 @@
 type
   THandle = Longint;
   TThreadID = Cardinal;
+  TOSTimestamp = Int64;
   
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record

+ 1 - 0
rtl/amicommon/sysosh.inc

@@ -19,6 +19,7 @@
 type
   THandle = PtrInt;
   TThreadID = THandle;
+  TOSTimestamp = Longint;
 
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record

+ 2 - 1
rtl/atari/sysosh.inc

@@ -23,7 +23,8 @@ type
   THandle = Longint;
 {$endif CPU64}
   TThreadID = THandle;
-  
+  TOSTimestamp = Longint;
+
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record
    Locked: boolean

+ 2 - 1
rtl/beos/sysosh.inc

@@ -20,7 +20,8 @@ type
   { fd are int in C also for 64bit targets (x86_64) }
   THandle = Longint;
   TThreadID = THandle;
-  
+  TOSTimestamp = Int64;
+
   { pthread_mutex_t }
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record

+ 2 - 1
rtl/bsd/sysosh.inc

@@ -21,7 +21,8 @@ type
   THandle = Longint;
   TThreadRec = record end;
   TThreadID  = ^TThreadRec;
-  
+  TOSTimestamp = Int64;
+
   { pthread_mutex_t }
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = {$i pmutext.inc}

+ 1 - 0
rtl/embedded/sysosh.inc

@@ -25,6 +25,7 @@ type
   {$else}
   TThreadID = THandle;
   {$endif}
+  TOSTimestamp = Int64;
 
   { pthread_mutex_t }
   PRTLCriticalSection = ^TRTLCriticalSection;

+ 2 - 2
rtl/emx/sysosh.inc

@@ -18,9 +18,9 @@
 {Platform specific information}
 type
   THandle = Longint;
-  
   TThreadID = cardinal;
-  
+  TOSTimestamp = Longint;
+
   { the fields of this record are os dependent  }
   { and they shouldn't be used in a program     }
   { only the type TCriticalSection is important }

+ 2 - 1
rtl/gba/sysosh.inc

@@ -19,7 +19,8 @@
 type
   THandle = Longint;
   TThreadID = THandle;
-  
+  TOSTimestamp = Longint;
+
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record
    Locked: boolean

+ 1 - 0
rtl/go32v2/sysosh.inc

@@ -19,6 +19,7 @@
 type
   THandle = Longint;
   TThreadID = THandle;
+  TOSTimestamp = Longint;
   
    PRTLCriticalSection = ^TRTLCriticalSection;
    TRTLCriticalSection = record

+ 2 - 1
rtl/haiku/sysosh.inc

@@ -20,7 +20,8 @@ type
   { fd are int in C also for 64bit targets (x86_64) }
   THandle = Longint;
   TThreadID = THandle;
-  
+  TOSTimestamp = Int64;
+
   { pthread_mutex_t }
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record

+ 2 - 0
rtl/java/sysosh.inc

@@ -16,6 +16,8 @@
 }
 
 type
+  TOSTimestamp = Longint;
+
   FpcRunTimeError = class(JLException)
     errornr: longint;
     constructor create(l: longint);

+ 2 - 0
rtl/linux/sysosh.inc

@@ -23,6 +23,8 @@ type
   { pthread_t is defined as an "unsigned long" }
   TThreadID = PtrUInt;
 
+  TOSTimestamp = Int64;
+
   PRTLCriticalSection = ^TRTLCriticalSection;
 {$macro on}
 {$define MUTEXTYPENAME := TRTLCriticalSection}

+ 5 - 4
rtl/macos/sysosh.inc

@@ -21,11 +21,12 @@ type
   THandle = Longint;
 {$endif CPU64}
   TThreadID = THandle;
+  TOSTimestamp = Longint;
 
-     PRTLCriticalSection = ^TRTLCriticalSection;
-     TRTLCriticalSection = record
-       Locked: boolean
-     end;
+  PRTLCriticalSection = ^TRTLCriticalSection;
+  TRTLCriticalSection = record
+    Locked: boolean
+  end;
 
 
 

+ 6 - 4
rtl/msdos/sysosh.inc

@@ -19,8 +19,10 @@
 type
   THandle = Word;
   TThreadID = THandle;
+  TOSTimestamp = Longint;
+
+  PRTLCriticalSection = ^TRTLCriticalSection;
+  TRTLCriticalSection = record
+    Locked: boolean
+  end;
 
-   PRTLCriticalSection = ^TRTLCriticalSection;
-   TRTLCriticalSection = record
-     Locked: boolean
-   end;

+ 1 - 0
rtl/nativent/sysosh.inc

@@ -17,6 +17,7 @@
 type
   THandle = PtrUInt;
   TThreadID = THandle;
+  TOSTimestamp = Longint;
 
   { the fields of this record are os dependent  }
   { and they shouldn't be used in a program     }

+ 2 - 1
rtl/nds/sysosh.inc

@@ -19,7 +19,8 @@
 type
   THandle = Longint;
   TThreadID = THandle;
-  
+  TOSTimestamp = Longint;
+
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record
    Locked: boolean

+ 1 - 0
rtl/netware/sysosh.inc

@@ -19,6 +19,7 @@
 type
   THandle = DWord;
   TThreadID = THandle;
+  TOSTimestamp = Longint;
   
    { the fields of this record are os dependent  }
    { and they shouldn't be used in a program     }

+ 2 - 1
rtl/netwlibc/sysosh.inc

@@ -18,7 +18,8 @@
 type
   THandle = DWord;
   TThreadID = THandle;
-  
+  TOSTimestamp = Longint;
+
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = packed record
       mutex : pointer;

+ 2 - 1
rtl/os2/sysosh.inc

@@ -19,7 +19,8 @@
 type
   THandle = Longint;
   TThreadID = cardinal;
-  
+  TOSTimestamp = Longint;
+
   { the fields of this record are os dependent  }
   { and they shouldn't be used in a program     }
   { only the type TCriticalSection is important }

+ 1 - 0
rtl/palmos/sysosh.inc

@@ -21,6 +21,7 @@ type
   THandle = Longint;
 {$endif CPU64}
   TThreadID = THandle;
+  TOSTimestamp = Longint;
 
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record

+ 1 - 0
rtl/solaris/sysosh.inc

@@ -18,6 +18,7 @@
 type
   THandle = Longint;
   TThreadID = Cardinal;
+  TOSTimestamp = Int64;
   
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record

+ 1 - 0
rtl/symbian/sysosh.inc

@@ -19,6 +19,7 @@
 type
   THandle = Longint;
   TThreadID = THandle;
+  TOSTimestamp = Longint;
 
   { pthread_mutex_t }
   PRTLCriticalSection = ^TRTLCriticalSection;

+ 1 - 0
rtl/watcom/sysosh.inc

@@ -19,6 +19,7 @@
 type
   THandle = Longint;
   TThreadID = THandle;
+  TOSTimestamp = Longint;
 
    PRTLCriticalSection = ^TRTLCriticalSection;
    TRTLCriticalSection = record

+ 2 - 1
rtl/wii/sysosh.inc

@@ -19,7 +19,8 @@
 type
   THandle = Longint;
   TThreadID = THandle;
-  
+  TOSTimestamp = Longint;
+
   PRTLCriticalSection = ^TRTLCriticalSection;
   TRTLCriticalSection = record
    Locked: boolean

+ 1 - 0
rtl/win/sysosh.inc

@@ -24,6 +24,7 @@ type
 {$endif CPU64}
   TThreadID = DWord;
   SIZE_T = ULONG_PTR;
+  TOSTimestamp = Int64;
 
   { the fields of this record are os dependent  }
   { and they shouldn't be used in a program     }

+ 1 - 0
rtl/win16/sysosh.inc

@@ -19,6 +19,7 @@
 type
   THandle = Word;
   TThreadID = THandle;
+  TOSTimestamp = Longint;
 
    PRTLCriticalSection = ^TRTLCriticalSection;
    TRTLCriticalSection = record