#if HAVE_SYS_TIMES_H
#include <sys/times.h>
#endif
-#if HAVE_WINSOCK_H && defined(mingw32_HOST_OS)
+#if HAVE_WINSOCK_H && defined(__MINGW32__)
#include <winsock.h>
#endif
#if HAVE_LIMITS_H
# include <stdint.h>
#endif
-#if !defined(mingw32_HOST_OS) && !defined(irix_HOST_OS)
+#if !defined(__MINGW32__) && !defined(irix_HOST_OS)
# if HAVE_SYS_RESOURCE_H
# include <sys/resource.h>
# endif
#endif
-#ifdef hpux_HOST_OS
-#include <sys/syscall.h>
-#define getrusage(a, b) syscall(SYS_GETRUSAGE, a, b)
-#define HAVE_GETRUSAGE
+#if !HAVE_GETRUSAGE && HAVE_SYS_SYSCALL_H
+# include <sys/syscall.h>
+# if defined(SYS_GETRUSAGE) /* hpux_HOST_OS */
+# define getrusage(a, b) syscall(SYS_GETRUSAGE, a, b)
+# define HAVE_GETRUSAGE 1
+# endif
#endif
/* For System */
#include "runProcess.h"
-#if defined(mingw32_HOST_OS)
+#if defined(__MINGW32__)
#include <io.h>
#include <fcntl.h>
#include "timeUtils.h"
/* in Signals.c */
extern HsInt nocldstop;
-#if !defined(mingw32_HOST_OS)
+#if !defined(_MSC_VER) && !defined(__MINGW32__) && !defined(_WIN32)
/* in execvpe.c */
extern int execvpe(char *name, char *const argv[], char **envp);
extern void pPrPr_disableITimers (void);
#endif
#endif
-#if !defined(mingw32_HOST_OS) && !defined(_MSC_VER)
+#if !defined(_MSC_VER) && !defined(__MINGW32__) && !defined(_WIN32)
INLINE int
__hscore_sigemptyset( sigset_t *set )
{ return sigemptyset(set); }
INLINE HsBool
__hscore_supportsTextMode()
{
-#if defined(mingw32_HOST_OS)
+#if defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32)
return HS_BOOL_FALSE;
#else
return HS_BOOL_TRUE;
INLINE HsInt
__hscore_setmode( HsInt fd, HsBool toBin )
{
-#if defined(mingw32_HOST_OS) || defined(_MSC_VER)
+#if defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32)
return setmode(fd,(toBin == HS_BOOL_TRUE) ? _O_BINARY : _O_TEXT);
#else
return 0;
}
-#if defined(mingw32_HOST_OS) || defined(_MSC_VER)
+#if defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32)
INLINE HsInt
__hscore_PrelHandle_send( HsInt fd, HsAddr ptr, HsInt off, int sz )
{
INLINE HsInt
__hscore_mkdir( HsAddr pathName, HsInt mode )
{
-#if defined(mingw32_HOST_OS) || defined(_MSC_VER)
+#if defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32)
return mkdir(pathName);
#else
return mkdir(pathName,mode);
INLINE HsInt
__hscore_sizeof_termios( void )
{
-#ifndef mingw32_HOST_OS
+#ifndef __MINGW32__
return sizeof(struct termios);
#else
return 0;
}
#endif
-#if !defined(mingw32_HOST_OS) && !defined(_MSC_VER)
+#if !defined(_MSC_VER) && !defined(__MINGW32__) && !defined(_WIN32)
INLINE HsInt
__hscore_sizeof_sigset_t( void )
{
INLINE int __hscore_hs_fileno (FILE *f) { return fileno (f); }
INLINE int __hscore_open(char *file, int how, mode_t mode) {
-#ifdef mingw32_HOST_OS
+#ifdef __MINGW32__
if ((how & O_WRONLY) || (how & O_RDWR) || (how & O_APPEND))
return _sopen(file,how,_SH_DENYRW,mode);
else
// select-related stuff
-#if !defined(mingw32_HOST_OS)
+#if !defined(__MINGW32__)
INLINE int hsFD_SETSIZE(void) { return FD_SETSIZE; }
INLINE void hsFD_CLR(int fd, fd_set *fds) { FD_CLR(fd, fds); }
INLINE int hsFD_ISSET(int fd, fd_set *fds) { return FD_ISSET(fd, fds); }
// gettimeofday()-related
-#if !defined(mingw32_HOST_OS)
+#if !defined(__MINGW32__)
#define TICK_FREQ 50
INLINE HsInt sizeofTimeVal(void) { return sizeof(struct timeval); }
p->tv_sec = ticks / TICK_FREQ;
p->tv_usec = (ticks % TICK_FREQ) * (1000000 / TICK_FREQ);
}
-#endif /* !defined(mingw32_HOST_OS) */
+#endif /* !defined(__MINGW32__) */
// Directory-related
-#if defined(mingw32_HOST_OS)
+#if defined(__MINGW32__)
/* Make sure we've got the reqd CSIDL_ constants in scope;
* w32api header files are lagging a bit in defining the full set.
INLINE int __hscore_CSIDL_PERSONAL() { return CSIDL_PERSONAL; }
#endif
-#if defined(mingw32_HOST_OS)
+#if defined(__MINGW32__)
INLINE unsigned int __hscore_get_osver(void) { return _osver; }
#endif