X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-posix%2Fconstants.lisp;h=48660fabd0caafa65c998854bbc3113c39c37891;hb=06c288327bb8ea3a9534c63c0a8a909445a62054;hp=c35bde0b23c9c19017fcf7a09eb2c56f8e83add1;hpb=0e1933f873c9fb073e3fc07e73c5401277bd0681;p=sbcl.git

diff --git a/contrib/sb-posix/constants.lisp b/contrib/sb-posix/constants.lisp
index c35bde0..48660fa 100644
--- a/contrib/sb-posix/constants.lisp
+++ b/contrib/sb-posix/constants.lisp
@@ -210,8 +210,8 @@
 #-sunos (:errno emediumtype "EMEDIUMTYPE" nil t)
 
  ;; wait
- (:integer wnohang "WNOHANG")
- (:integer wuntraced "WUNTRACED")
+ (:integer wnohang "WNOHANG" nil t)
+ (:integer wuntraced "WUNTRACED" nil t)
 
  ;; mode_t
  (:type mode-t "mode_t")
@@ -317,6 +317,8 @@
               ((unsigned 32) dev "dev_t" "st_dev")
               (nlink-t nlink "nlink_t" "st_nlink")
               (uid-t uid "uid_t" "st_uid")
+              #-mips
+              (dev-t 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")