diff options
| author | Herbert Valerio Riedel <hvr@gnu.org> | 2016-03-28 11:36:21 +0200 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2016-03-28 11:51:11 +0200 |
| commit | 0bca3f3a56c606e5060be03227f0ea9ca2197acc (patch) | |
| tree | bda242960f5a882e99f750e4b8d1be38f15f4dfa /rts/posix | |
| parent | 61df7f8fb4e76fc8987c0b4f02aa9ec795be7afb (diff) | |
| download | haskell-0bca3f3a56c606e5060be03227f0ea9ca2197acc.tar.gz | |
Scrap IRIX support
Long time ago, IRIX was way ahead of its time in the last century with
its SMP capabilities of scaling up to 1024 processors and other features
such as XFS or OpenGL that originated in IRIX and live on to this day in
other operating systems.
However, IRIX's last software update was in 2006 and support ended
around 2013 according to [1], so it's considered an extinct platform by
now. So this commit message is effectively an obituary for GHC's IRIX
support.
R.I.P. IRIX
[1]: https://en.wikipedia.org/wiki/IRIX
Diffstat (limited to 'rts/posix')
| -rw-r--r-- | rts/posix/GetTime.c | 6 | ||||
| -rw-r--r-- | rts/posix/OSMem.c | 15 |
2 files changed, 4 insertions, 17 deletions
diff --git a/rts/posix/GetTime.c b/rts/posix/GetTime.c index 24d0d50e8a..ab0d15e129 100644 --- a/rts/posix/GetTime.c +++ b/rts/posix/GetTime.c @@ -21,11 +21,11 @@ # include <sys/times.h> #endif -#if ! ((defined(HAVE_GETRUSAGE) && !irix_HOST_OS) || defined(HAVE_TIMES)) +#if ! (defined(HAVE_GETRUSAGE) || defined(HAVE_TIMES)) #error No implementation for getProcessCPUTime() available. #endif -#if defined(HAVE_GETTIMEOFDAY) && defined(HAVE_GETRUSAGE) && !irix_HOST_OS +#if defined(HAVE_GETTIMEOFDAY) && defined(HAVE_GETRUSAGE) // we'll implement getProcessCPUTime() and getProcessElapsedTime() // separately, using getrusage() and gettimeofday() respectively @@ -190,7 +190,7 @@ void getUnixEpochTime(StgWord64 *sec, StgWord32 *nsec) W_ getPageFaults(void) { -#if !defined(HAVE_GETRUSAGE) || irix_HOST_OS || haiku_HOST_OS +#if !defined(HAVE_GETRUSAGE) || haiku_HOST_OS return 0; #else struct rusage t; diff --git a/rts/posix/OSMem.c b/rts/posix/OSMem.c index 2a3c294fba..20d27bec4f 100644 --- a/rts/posix/OSMem.c +++ b/rts/posix/OSMem.c @@ -164,20 +164,7 @@ my_mmap (void *addr, W_ size, int operation) else flags = 0; -#if defined(irix_HOST_OS) - { - if (operation & MEM_RESERVE) - { - int fd = open("/dev/zero",O_RDONLY); - ret = mmap(addr, size, prot, flags | MAP_PRIVATE, fd, 0); - close(fd); - } - else - { - ret = mmap(addr, size, prot, flags | MAP_PRIVATE, -1, 0); - } - } -#elif hpux_HOST_OS +#if hpux_HOST_OS ret = mmap(addr, size, prot, flags | MAP_ANONYMOUS | MAP_PRIVATE, -1, 0); #elif linux_HOST_OS ret = mmap(addr, size, prot, flags | MAP_ANON | MAP_PRIVATE, -1, 0); |