PB_Includes/lhs_lib
2
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

modify return lhs_net_socket

Browse source
This commit is contained in:
René Linder 2024-09-17 10:32:09 +02:00
parent 374074c62f
commit b7277a873c
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
NET/lhs_net_socket.pbi
View file

@ -84,12 +84,12 @@ Module lsocket
If bind_(SocketID, @lsockets_server(Str(SocketID)), SizeOf(sockaddr_in)) <> 0 If bind_(SocketID, @lsockets_server(Str(SocketID)), SizeOf(sockaddr_in)) <> 0
Close_(SocketID) Close_(SocketID)
DeleteMapElement(lsockets_server(), Str(SocketID)) DeleteMapElement(lsockets_server(), Str(SocketID))
ProcedureReturn -1 ProcedureReturn -2
Else Else
If listen_(SocketID, Queuelengt) <> 0 If listen_(SocketID, Queuelengt) <> 0
Close_(SocketID) Close_(SocketID)
DeleteMapElement(lsockets_server(), Str(SocketID)) DeleteMapElement(lsockets_server(), Str(SocketID))
ProcedureReturn -1 ProcedureReturn -3
EndIf EndIf
EndIf EndIf
ProcedureReturn SocketID ProcedureReturn SocketID