Răsfoiți Sursa

* little fixes related to KQueue and Sendfile

git-svn-id: trunk@2529 -
marco 19 ani în urmă
părinte
comite
1656cdc574
2 a modificat fișierele cu 9 adăugiri și 1 ștergeri
  1. 1 0
      rtl/bsd/bsd.pas
  2. 8 1
      rtl/bsd/ostypes.inc

+ 1 - 0
rtl/bsd/bsd.pas

@@ -18,6 +18,7 @@ Unit BSD;
 
 
 {$IFDEF FPC}
 {$IFDEF FPC}
   {$PACKRECORDS C}
   {$PACKRECORDS C}
+  {$Inline On}
   {$Macro On}
   {$Macro On}
   {$ifdef FPC_USE_LIBC}
   {$ifdef FPC_USE_LIBC}
   {$define directives:=cdecl; external 'c';}
   {$define directives:=cdecl; external 'c';}

+ 8 - 1
rtl/bsd/ostypes.inc

@@ -281,7 +281,14 @@ Type
           	     rlim_max : TRLim;     { maximum value for rlim_cur }
           	     rlim_max : TRLim;     { maximum value for rlim_cur }
 		    end;	
 		    end;	
         PRLimit  = ^TRLimit;
         PRLimit  = ^TRLimit;
-       
+      
+  iovec = record
+            iov_base : pointer;
+	    iov_len  : size_t;
+	   end;
+  tiovec=iovec;
+  piovec=^tiovec;		
+ 
 CONST
 CONST
  { Constansts for MMAP }
  { Constansts for MMAP }
   MAP_PRIVATE   =2;
   MAP_PRIVATE   =2;