m_psml_assoc_list Module

Contents

Variables

EMPTY_ASSOC_LIST

Interfaces

assoc_list_get_value

Derived Types

assoc_list_t

Functions

assoc_list_nitems

Subroutines

assoc_list_init assoc_list_reset assoc_list_insert assoc_list_get_key assoc_list_get_value_of_key assoc_list_get_value_by_index assoc_list_print

Variables

Type	Visibility	Attributes		Name		Initial
type(assoc_list_t),	protected,	save	::	EMPTY_ASSOC_LIST

Interfaces

public interface assoc_list_get_value

• public subroutine assoc_list_get_value_by_index(a, i, value, stat)

  Arguments

  Type	Intent	Optional	Attributes		Name
  type(assoc_list_t),	intent(in)			::	a
  integer,	intent(in)			::	i
  character(len=*),	intent(out)			::	value
  integer,	intent(out)			::	stat

• public subroutine assoc_list_get_value_of_key(a, key, value, stat)

  Arguments

  Type	Intent	Optional	Attributes		Name
  type(assoc_list_t),	intent(in)			::	a
  character(len=*),	intent(in)			::	key
  character(len=*),	intent(out)			::	value
  integer,	intent(out)			::	stat

Derived Types

type, public ::  assoc_list_t

Components

Type	Visibility	Attributes		Name		Initial
integer,	private		::	nslots	=	0
integer,	private		::	nitems	=	0
character(len=200),	private,	allocatable	::	key(:)
character(len=1000),	private,	allocatable	::	value(:)

Functions

public function assoc_list_nitems(a) result(n)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(in)			::	a

Return Value integer

Subroutines

public subroutine assoc_list_init(a, n, stat)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(inout)			::	a
integer,	intent(in)			::	n
integer,	intent(out)			::	stat

public subroutine assoc_list_reset(a)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(inout)			::	a

public subroutine assoc_list_insert(a, key, value, stat)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(inout)			::	a
character(len=*),	intent(in)			::	key
character(len=*),	intent(in)			::	value
integer,	intent(out)			::	stat

public subroutine assoc_list_get_key(a, i, key, stat)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(in)			::	a
integer,	intent(in)			::	i
character(len=*),	intent(out)			::	key
integer,	intent(out)			::	stat

public subroutine assoc_list_get_value_of_key(a, key, value, stat)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(in)			::	a
character(len=*),	intent(in)			::	key
character(len=*),	intent(out)			::	value
integer,	intent(out)			::	stat

public subroutine assoc_list_get_value_by_index(a, i, value, stat)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(in)			::	a
integer,	intent(in)			::	i
character(len=*),	intent(out)			::	value
integer,	intent(out)			::	stat

public subroutine assoc_list_print(a)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(in)			::	a