Ниже приведен пример программы main.c, написанной на языке C, в которой используется функция second():
#include <stdio.h>
double second();
main()
{
double t1,t2;
t1 = second();
my_favorite_function();
t2 = second();
printf("my_favorite_function time: %7.9f\n",t2 - t1);
exit();
}
Ниже приведен пример программы на языке FORTRAN (main.f), также использующей подпрограмму second():
double precision t1
double precision t2
t1 = second()
my_favorite_subroutine()
t2 = second()
write(6,11) (t2 - t1)
11 format(f20.12)
end
Для компиляции программы main.c или main.f вызовите следующую команду:
xlc -O3 -c second.c timer.s xlf -O3 -o mainF main.f second.o timer.o xlc -O3 -o mainC main.c second.o timer.o