From c7fb2688ea23a906d8a90456f916ff7392c30876 Mon Sep 17 00:00:00 2001
From: Dave Love <fx@gcc.gnu.org>
Date: Thu, 9 Jul 1998 03:40:06 +0000
Subject: [PATCH] Replace TIMES conditional stuff removed in error by last
 change.

From-SVN: r21027
---
 libf2c/libU77/sys_clock_.c | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/libf2c/libU77/sys_clock_.c b/libf2c/libU77/sys_clock_.c
index a4b99b8cf22..7b7a9d0c0d2 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 <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 */
 }