Yet more delphi 2010 fixes

[lcore.git] / fd_utils.pas

diff --git a/fd_utils.pas b/fd_utils.pas
index b07a110ce4b1824428da25b94af3375d499823d3..de89e5fedaf41cc8d7a2aa60723142ee278b278d 100755 (executable)
--- a/fd_utils.pas
+++ b/fd_utils.pas
@@ -31,11 +31,11 @@ Procedure FD_Clr(fd:longint;var fds:fdSet);
 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
 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
 {$endif}\r
 \r
 implementation  \r