type\r
FDSet= Array [0..255] of longint; {31}\r
PFDSet= ^FDSet;\r
-const\r
- absoloutemaxs=(sizeof(fdset)*8)-1;\r
\r
Procedure FD_Clr(fd:longint;var fds:fdSet);\r
Procedure FD_Zero(var fds:fdSet);\r
Procedure FD_Set(fd:longint;var fds:fdSet);\r
Function FD_IsSet(fd:longint;var fds:fdSet):boolean;\r
-
-{$ifdef fpc}
- {$ifndef ver1_0}
- {$define useinline}
- {$endif}
+\r
+{$ifdef fpc}\r
+ {$ifndef ver1_0}\r
+ {$define useinline}\r
+ {$endif}\r
{$endif}\r
\r
implementation \r