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

r336 | jonas | 2012-02-12 22:09:38 +0100 (Sun, 12 Feb 2012) | 2 lines

Browse Source 
* fixed several types for 64 bit platforms (32 bit -> C long)

git-svn-id: trunk@20331 -
This commit is contained in:
Jonas Maebe 2012-02-12 21:11:04 +00:00
parent 0abcb738e5
commit 974e66abce
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
packages/univint/src/MacTypes.pas
View File

@ -398,7 +398,7 @@ type
PtrPtr = ^Ptr; PtrPtr = ^Ptr;
Handle = ^Ptr; Handle = ^Ptr;
Handle_fix = Handle; { used as field type when a record declaration contains a Handle field identifier } Handle_fix = Handle; { used as field type when a record declaration contains a Handle field identifier }
Size = SInt32; Size = SIGNEDLONG;
Size_fix = Size; { used as field type when a record declaration contains a Size field identifier } Size_fix = Size; { used as field type when a record declaration contains a Size field identifier }
SizePtr = ^Size; SizePtr = ^Size;
UnivPtr = Pointer; UnivPtr = Pointer;
@ -437,16 +437,16 @@ type
ConstLogicalAddress = UnivPtr; ConstLogicalAddress = UnivPtr;
PhysicalAddress = UnivPtr; PhysicalAddress = UnivPtr;
BytePtr = UInt8Ptr; BytePtr = UInt8Ptr;
ByteCount = UInt32; ByteCount = UNSIGNEDLONG;
ByteCountPtr = ^ByteCount; ByteCountPtr = ^ByteCount;
ByteOffset = UInt32; ByteOffset = UNSIGNEDLONG;
ByteOffsetPtr = ^ByteOffset; ByteOffsetPtr = ^ByteOffset;
Duration = SInt32; Duration = SInt32;
AbsoluteTime = UnsignedWide; AbsoluteTime = UnsignedWide;
AbsoluteTimePtr = ^AbsoluteTime; AbsoluteTimePtr = ^AbsoluteTime;
OptionBits = UInt32; OptionBits = UInt32;
OptionBitsPtr = ^OptionBits; OptionBitsPtr = ^OptionBits;
ItemCount = UInt32; ItemCount = UNSIGNEDLONG;
ItemCountPtr = ^ItemCount; ItemCountPtr = ^ItemCount;
PBVersion = UInt32; PBVersion = UInt32;
ScriptCode = SInt16; ScriptCode = SInt16;
@ -623,7 +623,7 @@ type
UTF8Char = UInt8; UTF8Char = UInt8;
UniCharPtr = ^UniChar; UniCharPtr = ^UniChar;
ConstUniCharPtr = UniCharPtr; ConstUniCharPtr = UniCharPtr;
UniCharCount = UInt32; UniCharCount = UNSIGNEDLONG;
UniCharCountPtr = ^UniCharCount; UniCharCountPtr = ^UniCharCount;
Str15 = STRING[15]; Str15 = STRING[15];
Str27 = STRING[27]; Str27 = STRING[27];