INLINE int __hscore_s_isreg(m) { return S_ISREG(m); }
INLINE int __hscore_s_isdir(m) { return S_ISDIR(m); }
INLINE int __hscore_s_isfifo(m) { return S_ISFIFO(m); }
INLINE int __hscore_s_isreg(m) { return S_ISREG(m); }
INLINE int __hscore_s_isdir(m) { return S_ISDIR(m); }
INLINE int __hscore_s_isfifo(m) { return S_ISFIFO(m); }
__hscore_PrelHandle_write( HsInt fd, HsBool isSock, HsAddr ptr,
HsInt off, int sz )
{
__hscore_PrelHandle_write( HsInt fd, HsBool isSock, HsAddr ptr,
HsInt off, int sz )
{
if (isSock) {
return send(fd,(char *)ptr + off, sz, 0);
}
if (isSock) {
return send(fd,(char *)ptr + off, sz, 0);
}
__hscore_PrelHandle_read( HsInt fd, HsBool isSock, HsAddr ptr,
HsInt off, int sz )
{
__hscore_PrelHandle_read( HsInt fd, HsBool isSock, HsAddr ptr,
HsInt off, int sz )
{
if (isSock) {
return recv(fd,(char *)ptr + off, sz, 0);
}
if (isSock) {
return recv(fd,(char *)ptr + off, sz, 0);
}
return lstat((const char*)fname, (struct stat*)st);
#else
return stat((const char*)fname, (struct stat*)st);
return lstat((const char*)fname, (struct stat*)st);
#else
return stat((const char*)fname, (struct stat*)st);
INLINE time_t __hscore_st_mtime ( struct stat* st ) { return st->st_mtime; }
INLINE off_t __hscore_st_size ( struct stat* st ) { return st->st_size; }
INLINE time_t __hscore_st_mtime ( struct stat* st ) { return st->st_mtime; }
INLINE off_t __hscore_st_size ( struct stat* st ) { return st->st_size; }
INLINE int __hsposix_SIGABRT() { return SIGABRT; }
INLINE int __hsposix_SIGALRM() { return SIGALRM; }
INLINE int __hsposix_SIGBUS() { return SIGBUS; }
INLINE int __hsposix_SIGABRT() { return SIGABRT; }
INLINE int __hsposix_SIGALRM() { return SIGALRM; }
INLINE int __hsposix_SIGBUS() { return SIGBUS; }
INLINE int __hsposix_SIGXFSZ() { return SIGXFSZ; }
INLINE int __hsposix_SIG_BLOCK() { return SIG_BLOCK; }
INLINE int __hsposix_SIGXFSZ() { return SIGXFSZ; }
INLINE int __hsposix_SIG_BLOCK() { return SIG_BLOCK; }
-INLINE int __hsposix_SIG_UNBLOCK() { return SIG_SETMASK; }
-INLINE int __hsposix_SIG_SETMASK() { return SIG_UNBLOCK; }
+INLINE int __hsposix_SIG_UNBLOCK() { return SIG_UNBLOCK; }
+INLINE int __hsposix_SIG_SETMASK() { return SIG_SETMASK; }