is_hidden_file Function

public function is_hidden_file(file_basename) result(r)

test if a file is hidden

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: file_basename

Return Value logical


Contents

Source Code

is_hidden_file

Source Code

logical function is_hidden_file(file_basename) result(r)
    character(*), intent(in) :: file_basename
    if (len(file_basename) <= 2) then
        r = .false.
    else
        r = str_begins_with_str(file_basename, '.')
    end if
end function is_hidden_file