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

* THandle is platform dependent

Browse Source
This commit is contained in:
peter 2003-10-16 15:43:13 +00:00
parent 28a441fd34
commit d0eac29ab9
8 changed files with 63 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/emx/system.pas
View File

@ -32,6 +32,8 @@ interface
{$I heaph.inc}
{Platform specific information}
type
THandle = Longint;
const
LineEnding = #13#10;
{ LFNSupport is defined separately below!!! }
@ -1246,7 +1248,10 @@ begin
end.
{
$Log$
Revision 1.14 2003-10-12 18:07:30 hajny
Revision 1.15 2003-10-16 15:43:13 peter
* THandle is platform dependent
Revision 1.14 2003/10/12 18:07:30 hajny
* wrong use of Intel syntax
Revision 1.13 2003/10/12 17:59:40 hajny

7
rtl/go32v2/system.pp
View File

@ -39,6 +39,8 @@ interface
{Platform specific information}
type
THandle = Longint;
const
LineEnding = #13#10;
{ LFNSupport is a variable here, defined below!!! }
@ -1511,7 +1513,10 @@ Begin
End.
{
$Log$
Revision 1.26 2003-10-03 21:46:25 peter
Revision 1.27 2003-10-16 15:43:13 peter
* THandle is platform dependent
Revision 1.26 2003/10/03 21:46:25 peter
* stdcall fixes
Revision 1.25 2003/09/29 18:39:59 hajny

11
rtl/inc/systemh.inc
View File

@ -265,12 +265,6 @@ Type
{ procedure type }
TProcedure = Procedure;
{$ifdef CPU64}
THandle = QWord;
{$else CPU64}
THandle = DWord;
{$endif CPU64}
const
{ Maximum value of the biggest signed and unsigned integer type available}
@ -699,7 +693,10 @@ const
{
$Log$
Revision 1.74 2003-10-08 16:24:47 florian
Revision 1.75 2003-10-16 15:43:13 peter
* THandle is platform dependent
Revision 1.74 2003/10/08 16:24:47 florian
* fixed some variant issues
* improved type declarations

12
rtl/macos/system.pp
View File

@ -21,6 +21,13 @@ interface
{$I systemh.inc}
{Platform specific information}
type
{$ifdef CPU64}
THandle = Int64;
{$else CPU64}
THandle = Longint;
{$endif CPU64}
const
LineEnding = #13;
LFNSupport = true;
@ -807,7 +814,10 @@ end.
{
$Log$
Revision 1.7 2003-09-27 11:52:35 peter
Revision 1.8 2003-10-16 15:43:13 peter
* THandle is platform dependent
Revision 1.7 2003/09/27 11:52:35 peter
* sbrk returns pointer
Revision 1.6 2003/09/12 12:45:15 olle

8
rtl/os2/system.pas
View File

@ -49,6 +49,9 @@ type
{$I heaph.inc}
{Platform specific information}
type
THandle = Longint;
const
LineEnding = #13#10;
{ LFNSupport is defined separately below!!! }
@ -1162,7 +1165,10 @@ begin
end.
{
$Log$
Revision 1.46 2003-10-14 21:10:06 hajny
Revision 1.47 2003-10-16 15:43:13 peter
* THandle is platform dependent
Revision 1.46 2003/10/14 21:10:06 hajny
* another longint2cardinal fix
Revision 1.45 2003/10/13 21:17:31 hajny

12
rtl/unix/sysunixh.inc
View File

@ -28,6 +28,13 @@ const
{$endif}
{Platform specific information}
type
{$ifdef CPU64}
THandle = Int64;
{$else CPU64}
THandle = Longint;
{$endif CPU64}
const
LineEnding = #10;
LFNSupport = true;
@ -55,7 +62,10 @@ var
{
$Log$
Revision 1.16 2002-10-15 19:30:15 peter
Revision 1.17 2003-10-16 15:43:13 peter
* THandle is platform dependent
Revision 1.16 2002/10/15 19:30:15 peter
* remove threadh.inc include
Revision 1.15 2002/09/07 16:01:28 peter

8
rtl/watcom/system.pp
View File

@ -32,6 +32,9 @@ INTERFACE
{$include heaph.inc}
{Platform specific information}
type
THandle = Longint;
const
LineEnding = #13#10;
{ LFNSupport is a variable here, defined below!!! }
@ -1139,7 +1142,10 @@ END.
{
$Log$
Revision 1.5 2003-10-03 21:59:28 peter
Revision 1.6 2003-10-16 15:43:13 peter
* THandle is platform dependent
Revision 1.5 2003/10/03 21:59:28 peter
* stdcall fixes
Revision 1.4 2003/09/29 18:52:36 hajny

12
rtl/win32/system.pp
View File

@ -32,6 +32,13 @@ interface
{$I systemh.inc}
{Platform specific information}
type
{$ifdef CPU64}
THandle = QWord;
{$else CPU64}
THandle = DWord;
{$endif CPU64}
const
LineEnding = #13#10;
LFNSupport = true;
@ -1532,7 +1539,10 @@ end.
{
$Log$
Revision 1.45 2003-10-06 23:52:53 florian
Revision 1.46 2003-10-16 15:43:13 peter
* THandle is platform dependent
Revision 1.45 2003/10/06 23:52:53 florian
* some data types cleaned up
Revision 1.44 2003/09/27 11:52:36 peter