mirrors/make-dfsg
1
0
Fork 0
mirror of https://salsa.debian.org/srivasta/make-dfsg.git synced 2024-12-26 05:57:17 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

(getloadavg): Add OSF_ALPHA support.

Browse source
This commit is contained in:
Richard M. Stallman 1994-09-17 00:16:57 +00:00
parent 9f71eaf6b5
commit c1e20276cb
1 changed files with 13 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
getloadavg.c
View file

@ -149,6 +149,7 @@ extern int errno;
#if defined (__osf__) && (defined (__alpha) || defined (__alpha__)) #if defined (__osf__) && (defined (__alpha) || defined (__alpha__))
#define OSF_ALPHA #define OSF_ALPHA
#include <sys/table.h>
#endif #endif
#if defined (__osf__) && (defined (mips) || defined (__mips__)) #if defined (__osf__) && (defined (mips) || defined (__mips__))
@ -702,6 +703,18 @@ getloadavg (loadavg, nelem)
: (load_ave.tl_avenrun.l[0] / (double) load_ave.tl_lscale)); : (load_ave.tl_avenrun.l[0] / (double) load_ave.tl_lscale));
#endif /* OSF_MIPS */ #endif /* OSF_MIPS */
#if !defined (LDAV_DONE) && defined (OSF_ALPHA)
#define LDAV_DONE
struct tbl_loadavg load_ave;
table (TBL_LOADAVG, 0, &load_ave, 1, sizeof (load_ave));
for (elem = 0; elem < nelem; elem++)
loadavg[elem]
= (load_ave.tl_lscale == 0
? load_ave.tl_avenrun.d[elem]
: (load_ave.tl_avenrun.l[elem] / (double) load_ave.tl_lscale));
#endif /* OSF_ALPHA */
#if !defined (LDAV_DONE) && defined (VMS) #if !defined (LDAV_DONE) && defined (VMS)
/* VMS specific code -- read from the Load Ave driver. */ /* VMS specific code -- read from the Load Ave driver. */