diff --git a/rtl/inc/ctypes.pp b/rtl/inc/ctypes.pp index e847ccd80c..10adcabd2d 100644 --- a/rtl/inc/ctypes.pp +++ b/rtl/inc/ctypes.pp @@ -77,6 +77,14 @@ Type cunsigned = cuint; pcunsigned = ^cunsigned; + + { Floating point } + cFloat = Single; + cDouble = Double; + clDouble = Extended; + pcFloat = ^cFloat; + pcDouble = ^cDouble; + pclDouble = ^clDouble; {$endif} // Kylix compat types @@ -90,7 +98,10 @@ end. { $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 Revision 1.3 2005/02/14 17:13:22 peter diff --git a/rtl/unix/aliasctp.inc b/rtl/unix/aliasctp.inc index df24f42a09..b2d4fe1d9f 100644 --- a/rtl/unix/aliasctp.inc +++ b/rtl/unix/aliasctp.inc @@ -44,9 +44,19 @@ Type pcushort= UnixType.pcushort; pcunsigned = UnixType.pcunsigned; + { Floating point } + cFloat = UnixType.cFloat; + cDouble = UnixType.cDouble; + clDouble = UnixType.clDouble; + pcFloat = UnixType.pcFloat; + pcDouble = UnixType.pcDouble; + pclDouble = UnixType.pclDouble; { $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 Revision 1.2 2005/02/05 23:02:37 florian diff --git a/rtl/unix/ctypes.inc b/rtl/unix/ctypes.inc index a0413e0768..44f4ab2586 100644 --- a/rtl/unix/ctypes.inc +++ b/rtl/unix/ctypes.inc @@ -66,10 +66,21 @@ Type cunsigned = cuint; pcunsigned = ^cunsigned; + + { Floating point } + cFloat = Single; + cDouble = Double; + clDouble = Extended; + pcFloat = ^cFloat; + pcDouble = ^cDouble; + pclDouble = ^clDouble; { $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 Revision 1.1 2005/02/13 22:14:36 peter