SocketError should be a threadvar, I think
Index: rtl/inc/socketsh.inc =================================================================== --- rtl/inc/socketsh.inc (revision 2308) +++ rtl/inc/socketsh.inc (working copy) @@ -152,7 +152,7 @@ TSockArray = Array[1..2] of Longint; //legacy -Var +threadvar SocketError:cint; function fpsocket (domain:cint; xtype:cint; protocol: cint):cint;
_______________________________________________ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
