Replace TIMES conditional stuff removed in

error by last change.

From-SVN: r21027

libf2c/libU77/sys_clock_.c

-/* 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 <time.h>
 # endif
 #endif
-#include <sys/times.h>
+#if HAVE_SYS_TIMES_H
+#  include <sys/times.h>
+#endif
 #include <limits.h>
 #if HAVE_UNISTD_H
 #  include <unistd.h>
 #endif
+#include <errno.h>		/* 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 */
 }