Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | temp_dir | |||
character(len=*), | intent(in) | :: | filename |
function get_temp_file_path(temp_dir, filename) result(file_path) character(len=*), intent(in) :: temp_dir, filename character(len=:), allocatable :: file_path ! Use FPM's cross-platform join_path file_path = join_path(trim(temp_dir), trim(filename)) end function get_temp_file_path