cache_directory Function

public function cache_directory() result(dir)

The cache directory, created if it doesn't exist yet (e.g. a VKFRAMES_CACHE_DIR not made yet); '' if there is none or it can't be created: nothing is cached.

Arguments

None

Return Value character(len=:), allocatable


Calls

proc~~cache_directory~~CallsGraph proc~cache_directory cache_directory interface~vkf_cache_directory vkf_cache_directory proc~cache_directory->interface~vkf_cache_directory

Source Code

    function cache_directory() result(dir)
        character(len=:), allocatable :: dir
        character(kind=c_char, len=4096) :: buf
        integer(c_int) :: n
        n = vkf_cache_directory(buf, len(buf, kind=c_int))
        dir = ''
        if (n > 0) dir = buf(1:n)
    end function cache_directory