X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fwrap.c;h=f0e5746363a14dd17d473b393acea2fd1280477f;hb=46e428110e302636b345928f6f052b8a282c64fa;hp=153ebd5f90f34516c645198ee4450126c8221025;hpb=10cdee0326e9e8a5bbfe1d8312a73d58f023fb5f;p=sbcl.git diff --git a/src/runtime/wrap.c b/src/runtime/wrap.c index 153ebd5..f0e5746 100644 --- a/src/runtime/wrap.c +++ b/src/runtime/wrap.c @@ -167,7 +167,10 @@ wrapped_readlink(char *path) * * Some motivated spark fixed MIPS. -- ths, 2005-10-06 */ -#ifdef LISP_FEATURE_MIPS +#if defined (LISP_FEATURE_LARGEFILE) +typedef dev_t ffi_dev_t; +typedef off_t ffi_off_t; +#elif defined(LISP_FEATURE_MIPS) typedef unsigned long ffi_dev_t; /* Linux/MIPS struct stat doesn't use dev_t */ typedef off_t ffi_off_t; #else @@ -452,9 +455,9 @@ int wifstopped(int status) { int wstopsig(int status) { return WSTOPSIG(status); } - /* FIXME: POSIX also defines WIFCONTINUED, but that appears not to exist on at least Linux... */ +#endif /* !LISP_FEATURE_WIN32 */ /* From SB-POSIX, stat-macros */ int s_isreg(mode_t mode) @@ -477,6 +480,7 @@ int s_isfifo(mode_t mode) { return S_ISFIFO(mode); } +#ifndef LISP_FEATURE_WIN32 int s_islnk(mode_t mode) { #ifdef S_ISLNK