diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-09-17 00:16:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-09-17 00:16:57 +0000 |
| commit | bbd619d769e0f033881cfd903309b1c447798770 (patch) | |
| tree | 3cdcb2fd5b6fb0b40dd69881c5cc5eaf73d80cae /src/getloadavg.c | |
| parent | 5e7f8733e512775b588edf58b4da8501f076c4ae (diff) | |
| download | emacs-bbd619d769e0f033881cfd903309b1c447798770.tar.gz | |
(getloadavg): Add OSF_ALPHA support.
Diffstat (limited to 'src/getloadavg.c')
| -rw-r--r-- | src/getloadavg.c | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/src/getloadavg.c b/src/getloadavg.c index 0f730a7ab2b..e7804f02b98 100644 --- a/src/getloadavg.c +++ b/src/getloadavg.c @@ -149,6 +149,7 @@ extern int errno; #if defined (__osf__) && (defined (__alpha) || defined (__alpha__)) #define OSF_ALPHA +#include <sys/table.h> #endif #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)); #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) /* VMS specific code -- read from the Load Ave driver. */ |