Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | parameter | :: | MAX_LEN_PORT_NAME | = | 16 | |
integer, | public, | parameter | :: | MAX_NUM_PORTS | = | 16 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | port_name | |||
class(BaseServer), | intent(in), | optional, | target | :: | server_ptr |
procedure(connect_to_client), public, deferred :: connect_to_client | |
procedure(connect_to_server), public, deferred :: connect_to_server | |
procedure(free_directory_resources), public, deferred :: free_directory_resources | |
procedure(publish), public, deferred :: publish |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=MAX_LEN_PORT_NAME), | public | :: | port_name | ||||
class(BaseServer), | public, | pointer | :: | server_ptr | => | null() |
private function new_PortInfo (port_name, server_ptr) |