1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
#include <stdio.h>
#include <sys/time.h>
#include <sys/resource.h>
#include "fwrap.h"
#ifdef __STDC__
double cputime(void)
#else
double cputime()
#endif
{
double current_time;
#ifdef RUSAGE_SELF
struct rusage temp;
getrusage(RUSAGE_SELF, &temp);
current_time = (temp.ru_utime.tv_sec + temp.ru_stime.tv_sec +
1.0e-6*(temp.ru_utime.tv_usec + temp.ru_stime.tv_usec));
#elif defined(CLOCKS_PER_SEC)
current_time = clock()/((double) CLOCKS_PER_SEC);
#else
fprintf(stderr,"\nERROR: Timing routines not available\n\n");
current_time = 0.0;
#endif
return (current_time);
}
#ifdef __STDC__
double FNAMEOF_fcpu_t(void)
#else
double FNAMEOF_fcpu_t()
#endif
{
return cputime();
}
|
