From: Dave Love Date: Thu, 9 Jul 1998 03:40:06 +0000 (+0000) Subject: Replace TIMES conditional stuff removed in X-Git-Tag: prereleases/egcs-1.1-prerelease~355 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c7fb2688ea23a906d8a90456f916ff7392c30876;p=thirdparty%2Fgcc.git Replace TIMES conditional stuff removed in error by last change. From-SVN: r21027 --- diff --git a/libf2c/libU77/sys_clock_.c b/libf2c/libU77/sys_clock_.c index a4b99b8cf22a..7b7a9d0c0d2c 100644 --- a/libf2c/libU77/sys_clock_.c +++ b/libf2c/libU77/sys_clock_.c @@ -1,4 +1,4 @@ -/* Copyright (C) 1996 Free Software Foundation, Inc. +/* Copyright (C) 1996, 1998 Free Software Foundation, Inc. This file is part of GNU Fortran libU77 library. This library is free software; you can redistribute it and/or modify it @@ -29,11 +29,14 @@ Boston, MA 02111-1307, USA. */ # include # endif #endif -#include +#if HAVE_SYS_TIMES_H +# include +#endif #include #if HAVE_UNISTD_H # include #endif +#include /* for ENOSYS */ #include "f2c.h" #ifdef KR_headers @@ -43,6 +46,7 @@ int G77_system_clock_0 (count, count_rate, count_max) int G77_system_clock_0 (integer *count, integer *count_rate, integer *count_max) #endif { +#if defined (HAVE_TIMES) struct tms buffer; unsigned long cnt; if (count_rate) { @@ -52,6 +56,8 @@ int G77_system_clock_0 (integer *count, integer *count_rate, integer *count_max) *count_rate = CLOCKS_PER_SECOND; #elif defined CLK_TCK *count_rate = CLK_TCK; +#elif defined HZ + *count_rate = HZ; #else #error Dont know clock tick length #endif @@ -64,4 +70,8 @@ int G77_system_clock_0 (integer *count, integer *count_rate, integer *count_max) else *count = cnt; return 0; +#else /* ! HAVE_TIMES */ + errno = ENOSYS; + return -1; +#endif /* ! HAVE_TIMES */ }