//this one has to be kept public for now because lcorewsaasyncselect calls it\r
procedure connectionfailedhandler(error:word);\r
private\r
- isv6socket : boolean; //identifies if the socket is v6, set by bindsocket\r
+ {$ifdef ipv6}\r
+ isv6socket : boolean; //identifies if the socket is v6, set by bindsocket\r
+ {$endif}\r
procedure taskcallconnectionfailedhandler(wparam,lparam : longint);\r
\r
procedure connecttimeouthandler(sender:tobject);\r
end;\r
//gethostbyname(localaddr,host);\r
inaddrtempsize := makeinaddrv(forwardlookup(localaddr,0),localport,inaddrtemp);\r
- isv6socket := (inaddrtemp.inaddr.family = AF_INET6);\r
+ {$ifdef ipv6}\r
+ isv6socket := (inaddrtemp.inaddr.family = AF_INET6);\r
+ {$endif}\r
If Bind(fdhandlein,inaddrtempx,inaddrtempsize)<> {$ifdef win32}0{$else}true{$endif} Then begin\r
state := wsclosed;\r
lasterror := {$ifdef win32}getlasterror{$else}socketerror{$endif};\r