xml_tag Interface

public interface xml_tag

Overload xml_tag with creator procedures.

Calls

interface~~xml_tag~~CallsGraph interface~xml_tag xml_tag proc~create_tag_flat create_tag_flat interface~xml_tag->proc~create_tag_flat proc~create_tag_nested create_tag_nested interface~xml_tag->proc~create_tag_nested
Help

Called By

interface~~xml_tag~~CalledByGraph interface~xml_tag xml_tag program~create_tag create_tag program~create_tag->interface~xml_tag program~add_attributes add_attributes program~add_attributes->interface~xml_tag program~delete_attributes delete_attributes program~delete_attributes->interface~xml_tag program~indent_tag indent_tag program~indent_tag->interface~xml_tag program~delete_content delete_content program~delete_content->interface~xml_tag program~add_tag add_tag program~add_tag->interface~xml_tag program~write_tag write_tag program~write_tag->interface~xml_tag
Help

Module Procedures

private pure function create_tag_flat(name, attribute, attributes, attributes_stream, sanitize_attributes_value, content, indent, is_content_indented, is_self_closing) result(tag)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: name

Tag name.

character(len=*), intent(in), optional :: attribute(1:)

Attribute name/value pair [1:2].

character(len=*), intent(in), optional :: attributes(1:,1:)

Attributes list of name/value pairs [1:2,1:].

character(len=*), intent(in), optional :: attributes_stream

Attributes list of name/value pairs as single stream.

logical, intent(in), optional :: sanitize_attributes_value

Sanitize attributes value.

character(len=*), intent(in), optional :: content

Tag value.

integer(kind=I4P), intent(in), optional :: indent

Number of indent-white-spaces.

logical, intent(in), optional :: is_content_indented

Activate content indentation.

logical, intent(in), optional :: is_self_closing

The tag is self closing.

Return Value type(xml_tag)

XML tag.

Description

Return an instance of xml tag.

private pure function create_tag_nested(name, content, attribute, attributes, attributes_stream, sanitize_attributes_value, indent, is_content_indented) result(tag)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: name

Tag name.

type(xml_tag), intent(in) :: content

Tag value as nested tag..

character(len=*), intent(in), optional :: attribute(1:)

Attribute name/value pair [1:2].

character(len=*), intent(in), optional :: attributes(1:,1:)

Attributes list of name/value pairs [1:2,1:].

character(len=*), intent(in), optional :: attributes_stream

Attributes list of name/value pairs as single stream.

logical, intent(in), optional :: sanitize_attributes_value

Sanitize attributes value.

integer(kind=I4P), intent(in), optional :: indent

Number of indent-white-spaces.

logical, intent(in), optional :: is_content_indented

Activate value indentation.

Return Value type(xml_tag)

XML tag.

Description

Return an instance of xml tag with value being a nested tag.