functionhas_rootpureprivate
pure logical function has_root(path)
True if path is absolute.
Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
| path | character(len=*) | in | the path |
Result
| Name | Type | Attributes | Description |
|---|---|---|---|
| has_root | logical |
Calls
Source
Show the code
pure logical function has_root(path)
character(len=*), intent(in) :: path !! the path
has_root = has_drive(path)
if (len(path) > 0) has_root = has_root .or. path(1:1) == '/'
end function has_root