paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-21 11:59:51 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed long type and derivates for win64

Browse Source 
git-svn-id: trunk@5409 -
This commit is contained in:
florian 2006-11-16 20:39:00 +00:00
parent e04e668640
commit 442ad0cbe8
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/inc/ctypes.pp
View File

@ -31,7 +31,7 @@ type
{ the following type definitions are compiler dependant } { the following type definitions are compiler dependant }
{ and system dependant } { and system dependant }
cint8 = shortint; pcint8 = ^cint8; cint8 = shortint; pcint8 = ^cint8;
cuint8 = byte; pcuint8 = ^cuint8; cuint8 = byte; pcuint8 = ^cuint8;
cchar = cint8; pcchar = ^cchar; cchar = cint8; pcchar = ^cchar;
@ -59,8 +59,8 @@ type
culonglong = cuint64; pculonglong = ^culonglong; culonglong = cuint64; pculonglong = ^culonglong;
cbool = longbool; pcbool = ^cbool; cbool = longbool; pcbool = ^cbool;
{$ifdef cpu64} {$if defined(cpu64) and not(defined(win64) and defined(cpux86_64))}
clong = int64; pclong = ^clong; clong = int64; pclong = ^clong;
cslong = int64; pcslong = ^cslong; cslong = int64; pcslong = ^cslong;
culong = qword; pculong = ^culong; culong = qword; pculong = ^culong;
@ -69,7 +69,7 @@ type
cslong = longint; pcslong = ^cslong; cslong = longint; pcslong = ^cslong;
culong = cardinal; pculong = ^culong; culong = cardinal; pculong = ^culong;
{$endif} {$endif}
cfloat = single; pcfloat = ^cfloat; cfloat = single; pcfloat = ^cfloat;
cdouble = double; pcdouble = ^cdouble; cdouble = double; pcdouble = ^cdouble;
clongdouble = extended; pclongdouble = ^clongdouble; clongdouble = extended; pclongdouble = ^clongdouble;