fdoc

functiondisplay_namepureprivate

pure character(len=display_length(e)) function display_name(e) result(name)

The base name of a file entity, or the name of another.

Arguments

NameTypeIntentAttributesDescription
etype(entity_t)in

the entity

Result

NameTypeAttributesDescription
namecharacter(len=display_length(e))private

Calls

Source

Show the code
pure function display_name(e) result(name)
    type(entity_t), intent(in) :: e     !! the entity
    character(len=display_length(e)) :: name
    integer :: at

    at = 0
    if (e%kind == E_FILE) at = last_separator(e%name)
    name = e%name(at + 1:)
end function display_name

Graphs

Calls

Called by