rvprof/src/rvprof_fortran.c

29 lines
610 B
C

#include "rvprof_internal.h"
// no need to call directly anymore
void rvprof_init_c(const char* filename) {
if (!filename || strlen(filename) == 0) {
rvprof_init(NULL);
} else {
rvprof_init(filename);
}
}
// no need to call directly anymore
void rvprof_finalize_c(void) {
rvprof_finalize();
}
void rvprof_region_begin_c(const char* name) {
rvprof_region_begin(name);
}
void rvprof_region_end_c(const char* name) {
rvprof_region_end(name);
}
// no need to call directly anymore
void rvprof_set_program_name_c(const char* name) {
rvprof_set_program_name(name);
}