Browse Source

+ floating point c types added

florian 20 years ago
parent
commit
02c6c9abcc
3 changed files with 35 additions and 3 deletions
  1. 12 1
      rtl/inc/ctypes.pp
  2. 11 1
      rtl/unix/aliasctp.inc
  3. 12 1
      rtl/unix/ctypes.inc

+ 12 - 1
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

+ 11 - 1
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

+ 12 - 1
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