X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fwrap.c;h=365d89569707a5150c4c71951630ed736dd495f2;hb=e4542bc034db18cf98f005b2dac53a6d7d5c7260;hp=2b90248a20d793eca7543d88e5d13391b2db40a8;hpb=79cc569a97e444389350ea3f5b1017374fe16bec;p=sbcl.git

diff --git a/src/runtime/wrap.c b/src/runtime/wrap.c
index 2b90248..365d895 100644
--- a/src/runtime/wrap.c
+++ b/src/runtime/wrap.c
@@ -155,9 +155,17 @@ wrapped_readlink(char *path)
  * actual 64-bit values instead.  In fact, we probably have by now
  * (2003-10-03) on all working platforms except MIPS and HPPA; if some
  * motivated spark would simply fix those, this hack could go away.
- * -- CSR, 2003-10-03 */
+ * -- CSR, 2003-10-03
+ *
+ * Some motivated spark fixed MIPS. -- ths, 2005-10-06 */
+
+#ifdef 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
 typedef u32 ffi_dev_t; /* since Linux dev_t can be 64 bits */
 typedef u32 ffi_off_t; /* since OpenBSD 2.8 st_size is 64 bits */
+#endif
 
 /* a representation of stat(2) results which doesn't depend on CPU or OS */
 struct stat_wrapper {