Helpers.Netstatval used_listening_ports :
< application_name : Internal_pervasives.string
; console : Console.t
; paths : Paths.t
; runner : Running_processes.State.t.. > ->
((Internal_pervasives.int
* [> `Tcp of
Internal_pervasives.int
* Internal_pervasives.string Internal_pervasives.list ])
Internal_pervasives.list,
[> Internal_pervasives.System_error.t
| Internal_pervasives.Process_result.Error.t ])
Internal_pervasives.Asynchronous_result.tCall "netstat" to find TCP ports already in use.