Searched refs:tarray (Results 1 - 10 of 10) sorted by relevance

/haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/
H A Dintrinsic_8.f9010 REAL(4) :: tarray(1:2) variable in program:test_etime
13 CALL etime(tarray, result)
19 REAL(4) :: tarray(1:2) local in subroutine:test_etime2
22 result = etime(tarray)
/haiku-buildtools/legacy/gcc/libf2c/libU77/
H A Dsecond_.c23 real tarray[2]; local
25 return G77_etime_0 (tarray);
H A Dgmtime_.c36 /* Subroutine */ int G77_gmtime_0 (xstime, tarray)
37 integer *xstime, tarray[9];
39 /* Subroutine */ int G77_gmtime_0 (const integer * xstime, integer tarray[9])
45 tarray[0] = lt->tm_sec;
46 tarray[1] = lt->tm_min;
47 tarray[2] = lt->tm_hour;
48 tarray[3] = lt->tm_mday;
49 tarray[4] = lt->tm_mon;
50 tarray[5] = lt->tm_year;
51 tarray[
[all...]
H A Dltime_.c36 /* Subroutine */ int G77_ltime_0 (xstime, tarray)
37 integer *xstime, tarray[9];
39 /* Subroutine */ int G77_ltime_0 (const integer * xstime, integer tarray[9])
45 tarray[0] = lt->tm_sec;
46 tarray[1] = lt->tm_min;
47 tarray[2] = lt->tm_hour;
48 tarray[3] = lt->tm_mday;
49 tarray[4] = lt->tm_mon;
50 tarray[5] = lt->tm_year;
51 tarray[
[all...]
H A Ditime_.c36 /* Subroutine */ int G77_itime_0 (tarray)
37 integer tarray[3];
39 /* Subroutine */ int G77_itime_0 (integer tarray[3])
47 tarray[0] = lt->tm_hour;
48 tarray[1] = lt->tm_min;
49 tarray[2] = lt->tm_sec;
H A Ddtime_.c52 double G77_dtime_0 (tarray)
53 real tarray[2];
55 double G77_dtime_0 (real tarray[2])
100 tarray[0] = (float) delta;
101 tarray[1] = 0.0;
117 tarray[0] = (utime - old_utime) / 1.0e7;
118 tarray[1] = (stime - old_stime) / 1.0e7;
122 return tarray[0] + tarray[1];
135 tarray[
[all...]
H A Detime_.c52 double G77_etime_0 (tarray)
53 real tarray[2];
55 double G77_etime_0 (real tarray[2])
103 tarray[0] = usertime = (double) (count - old_count) / clock_freq;
104 tarray[1] = systime = 0.0;
118 tarray[0] = usertime = utime / 1.0e7;
119 tarray[1] = systime = stime / 1.0e7;
130 tarray[0] = ((float) (rbuff.ru_utime).tv_sec +
132 tarray[1] = ((float) (rbuff.ru_stime).tv_sec +
152 tarray[
[all...]
/haiku-buildtools/legacy/gcc/libf2c/libF77/
H A Detime_.c28 etime_(tarray) float *tarray;
30 etime_(float *tarray)
38 tarray[1] = 0;
39 return tarray[0] = t / CLOCKS_PER_SECOND;
44 return (tarray[0] = t.tms_utime/Hz) + (tarray[1] = t.tms_stime/Hz);
H A Ddtime_.c28 dtime_(tarray) float *tarray;
30 dtime_(float *tarray)
39 tarray[1] = 0;
40 tarray[0] = (t - t0) / CLOCKS_PER_SECOND;
42 return tarray[0];
48 tarray[0] = (t.tms_utime - t0.tms_utime) / Hz;
49 tarray[1] = (t.tms_stime - t0.tms_stime) / Hz;
51 return tarray[0] + tarray[
[all...]
/haiku-buildtools/legacy/gcc/libf2c/
H A Df2cext.c263 double dtime_ (real tarray[2]) { argument
264 extern double G77_dtime_0 (real tarray[2]);
265 return G77_dtime_0 (tarray);
270 double etime_ (real tarray[2]) { argument
271 extern double G77_etime_0 (real tarray[2]);
272 return G77_etime_0 (tarray);
375 int gmtime_ (const integer *stime, integer tarray[9]) { argument
376 extern int G77_gmtime_0 (const integer *stime, integer tarray[9]);
377 return G77_gmtime_0 (stime, tarray);
417 int itime_ (integer tarray[ argument
452 ltime_(const integer *stime, integer tarray[9]) argument
[all...]

Completed in 58 milliseconds