OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Replace TIMES conditional stuff removed in 

error by last change.

From-SVN: r21027
This commit is contained in:
Dave Love 1998-07-09 03:40:06 +00:00
parent da490d1483
commit c7fb2688ea
1 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
libf2c/libU77/sys_clock_.c
View File

@ -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 file is part of GNU Fortran libU77 library.
This library is free software; you can redistribute it and/or modify it 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> # include <time.h>
# endif # endif
#endif #endif
#include <sys/times.h> #if HAVE_SYS_TIMES_H
# include <sys/times.h>
#endif
#include <limits.h> #include <limits.h>
#if HAVE_UNISTD_H #if HAVE_UNISTD_H
# include <unistd.h> # include <unistd.h>
#endif #endif
#include <errno.h> /* for ENOSYS */
#include "f2c.h" #include "f2c.h"
#ifdef KR_headers #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) int G77_system_clock_0 (integer *count, integer *count_rate, integer *count_max)
#endif #endif
{ {
#if defined (HAVE_TIMES)
struct tms buffer; struct tms buffer;
unsigned long cnt; unsigned long cnt;
if (count_rate) { 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; *count_rate = CLOCKS_PER_SECOND;
#elif defined CLK_TCK #elif defined CLK_TCK
*count_rate = CLK_TCK; *count_rate = CLK_TCK;
#elif defined HZ
*count_rate = HZ;
#else #else
#error Dont know clock tick length #error Dont know clock tick length
#endif #endif
@ -64,4 +70,8 @@ int G77_system_clock_0 (integer *count, integer *count_rate, integer *count_max)
else else
*count = cnt; *count = cnt;
return 0; return 0;
#else /* ! HAVE_TIMES */
errno = ENOSYS;
return -1;
#endif /* ! HAVE_TIMES */
} }