From 5311c55dde4deee4b21fb09f9d7b97572083a7d9 Mon Sep 17 00:00:00 2001 From: David Lichteblau Date: Wed, 31 Oct 2012 16:20:11 +0100 Subject: [PATCH] Linux/MIPS uses "unsigned long" instead of dev_t in struct stat Handle rdev the same way as dev. --- contrib/sb-posix/constants.lisp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/contrib/sb-posix/constants.lisp b/contrib/sb-posix/constants.lisp index 0b66705..789cb91 100644 --- a/contrib/sb-posix/constants.lisp +++ b/contrib/sb-posix/constants.lisp @@ -318,8 +318,11 @@ ((unsigned 32) dev "dev_t" "st_dev") (nlink-t nlink "nlink_t" "st_nlink") (uid-t uid "uid_t" "st_uid") + ;; Linux/MIPS uses unsigned long instead of dev_t here. #-mips (dev-t rdev "dev_t" "st_rdev") + #+mips + ((unsigned 32) rdev "dev_t" "st_rdev") (gid-t gid "gid_t" "st_gid") (off-t size "off_t" "st_size") (time-t atime "time_t" "st_atime") -- 1.7.10.4