paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-03 22:38:38 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ floating point c types added

Browse Source
This commit is contained in:
florian 2005-03-13 10:05:13 +00:00
parent 069a5206e1
commit 02c6c9abcc
3 changed files with 35 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
rtl/inc/ctypes.pp
View File

@ -77,6 +77,14 @@ Type
cunsigned = cuint; cunsigned = cuint;
pcunsigned = ^cunsigned; pcunsigned = ^cunsigned;
{ Floating point }
cFloat = Single;
cDouble = Double;
clDouble = Extended;
pcFloat = ^cFloat;
pcDouble = ^cDouble;
pclDouble = ^clDouble;
{$endif} {$endif}
// Kylix compat types // Kylix compat types
@ -90,7 +98,10 @@ end.
{ {
$Log$ $Log$
Revision 1.4 2005-03-01 22:45:09 hajny Revision 1.5 2005-03-13 10:05:13 florian
+ floating point c types added
Revision 1.4 2005/03/01 22:45:09 hajny
* Florian's changes from ctypes.inc merged in to make xlib compilable under non-Unix again * Florian's changes from ctypes.inc merged in to make xlib compilable under non-Unix again
Revision 1.3 2005/02/14 17:13:22 peter Revision 1.3 2005/02/14 17:13:22 peter

12
rtl/unix/aliasctp.inc
View File

@ -44,9 +44,19 @@ Type
pcushort= UnixType.pcushort; pcushort= UnixType.pcushort;
pcunsigned = UnixType.pcunsigned; pcunsigned = UnixType.pcunsigned;
{ Floating point }
cFloat = UnixType.cFloat;
cDouble = UnixType.cDouble;
clDouble = UnixType.clDouble;
pcFloat = UnixType.pcFloat;
pcDouble = UnixType.pcDouble;
pclDouble = UnixType.pclDouble;
{ {
$Log$ $Log$
Revision 1.3 2005-02-14 17:13:31 peter Revision 1.4 2005-03-13 10:05:13 florian
+ floating point c types added
Revision 1.3 2005/02/14 17:13:31 peter
* truncate log * truncate log
Revision 1.2 2005/02/05 23:02:37 florian Revision 1.2 2005/02/05 23:02:37 florian

13
rtl/unix/ctypes.inc
View File

@ -66,10 +66,21 @@ Type
cunsigned = cuint; cunsigned = cuint;
pcunsigned = ^cunsigned; pcunsigned = ^cunsigned;
{ Floating point }
cFloat = Single;
cDouble = Double;
clDouble = Extended;
pcFloat = ^cFloat;
pcDouble = ^cDouble;
pclDouble = ^clDouble;
{ {
$Log$ $Log$
Revision 1.2 2005-02-14 17:13:31 peter Revision 1.3 2005-03-13 10:05:13 florian
+ floating point c types added
Revision 1.2 2005/02/14 17:13:31 peter
* truncate log * truncate log
Revision 1.1 2005/02/13 22:14:36 peter Revision 1.1 2005/02/13 22:14:36 peter