Ver Fonte

* Remove reming usage of errno.

git-svn-id: trunk@5981 -
daniel há 18 anos atrás
pai
commit
e47681ab0d
1 ficheiros alterados com 1 adições e 1 exclusões
  1. 1 1
      rtl/inc/sockets.inc

+ 1 - 1
rtl/inc/sockets.inc

@@ -66,7 +66,7 @@ begin
           end;
       end;
       if r=-1 then
-        case errno of
+        case socketerror of
           EsockEBADF:
 {          EsysENOTSOCK:}   {Why is this constant not defined? (DM)}
             inoutres:=6;    {Invalid file handle.}