Library: TCP/IP client and server support (OMTCP)
Import : omtcp.xmd
define external function tcp.destroy-service value tcp.service this-service
Use tcp.destroy-service to explicitly close a TCP service object, effectively detaching the program from the TCP port.
You can use tcp.destroy-service to destroy a sevice that has never been created or has already been destroyed.
Allowing the tcp.service variable to go out of scope has the same effect as using tcp.destroy-service.
No more client connection requests can be accepted once the connection is closed.
import "omtcp.xmd" prefixed by tcp. process local tcp.service DemoService . . . set DemoService to tcp.create-service on 5600 . . . tcp.destroy-service DemoService