X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-posix%2Fconstants.lisp;h=c65dc5cea532de3976a4f57cf2e0c0bc0e150439;hb=d3392df09363005b7e8c19c8e07136fd2c13c1b5;hp=3e24e0e6d78ad8e10bfecb7519117b3b465ad9b0;hpb=9b6bef920da10d33e6fcd43c1bc06cf528f4f507;p=sbcl.git

diff --git a/contrib/sb-posix/constants.lisp b/contrib/sb-posix/constants.lisp
index 3e24e0e..c65dc5c 100644
--- a/contrib/sb-posix/constants.lisp
+++ b/contrib/sb-posix/constants.lisp
@@ -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")