1.0.10.5: dynamic-extent CONS

[sbcl.git] / contrib / sb-posix / constants.lisp

diff --git a/contrib/sb-posix/constants.lisp b/contrib/sb-posix/constants.lisp
index 3e24e0e..bf0fe3b 100644 (file)
--- a/contrib/sb-posix/constants.lisp
+++ b/contrib/sb-posix/constants.lisp
@@ -77,7 +77,7 @@
  (:integer SIGPROF "SIGPROF"
            #+sb-doc "profiling timer alarm (see setitimer(2))." t)
  (:integer SIGWINCH "SIGWINCH" #+sb-doc "Window size change." t)
- (:integer SIGINFO "SIGINFO" #+sb-doc "status request from keyboard." t)
+ (:integer SIGPWR "SIGPWR" #+sb-doc "Power failure." t)
  (:integer SIGUSR1 "SIGUSR1" #+sb-doc "User defined signal 1." t)
  (:integer SIGUSR2 "SIGUSR2" #+sb-doc "User defined signal 2." t)
  (:integer SIGRTMIN "SIGRTMIN" #+sb-doc "Smallest real-time signal number." t)
@@ -341,6 +341,12 @@
  (:integer f-getown "F_GETOWN" nil t)
  (:integer f-setown "F_SETOWN" nil t)
 
+ ;; lockf()
+ (:integer f-lock "F_LOCK" nil t)
+ (:integer f-tlock "F_TLOCK" nil t)
+ (:integer f-ulock "F_ULOCK" nil t)
+ (:integer f-test "F_TEST" nil t)
+
  ;; tcgetattr(), tcsetattr()
  #-win32
  (:type cc-t "cc_t")
@@ -361,8 +367,8 @@
  ;; utime(), utimes()
  #-win32
  (:type suseconds-t ; OAOOM warning: similar kludge in tools-for-build
-        #-(and darwin ppc) "suseconds_t"
-        #+(and darwin ppc) "int")
+        #+os-provides-suseconds-t "suseconds_t"
+        #-os-provides-suseconds-t "long")
 
  #-win32
  (:structure alien-utimbuf