diff options
Diffstat (limited to 'contrib/libf2c/libF77/etime_.c')
-rw-r--r-- | contrib/libf2c/libF77/etime_.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/contrib/libf2c/libF77/etime_.c b/contrib/libf2c/libF77/etime_.c index e88cfd8..0c3209d 100644 --- a/contrib/libf2c/libF77/etime_.c +++ b/contrib/libf2c/libF77/etime_.c @@ -41,6 +41,7 @@ etime_(float *tarray) struct tms t; times(&t); - return (tarray[0] = t.tms_utime/Hz) + (tarray[1] = t.tms_stime/Hz); + return (tarray[0] = (double)t.tms_utime/Hz) + + (tarray[1] = (double)t.tms_stime/Hz); #endif } |