Pārlūkot izejas kodu

* Remove reming usage of errno.

git-svn-id: trunk@5981 -
daniel 18 gadi atpakaļ
vecāks
revīzija
e47681ab0d
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  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.}