QueryPerformanceCounter Interface

interface

For Windows, use high-resolution system call for timing.


private function QueryPerformanceCounter(PerformanceCount_count) result(is_succeeded_c) bind(c, name="QueryPerformanceCounter")

Arguments

Type IntentOptional Attributes Name
integer(kind=c_long_long), intent(out) :: PerformanceCount_count

Return Value logical(kind=c_bool)