From be8d616f258ee5ffd54bb8e48e9495b22ec9fb2f Mon Sep 17 00:00:00 2001
From: Vasily Postnicov <shamaz.mazum@gmail.com>
Date: Sat, 15 Mar 2014 09:37:33 +0400
Subject: [PATCH] Missing ERRNO: add fix for FreeBSD too

---
 src/syscalls/ffi-types-unix.lisp |  8 ++++----
 src/syscalls/pkgdcl.lisp         | 12 ++++++++----
 2 files changed, 12 insertions(+), 8 deletions(-)

diff --git a/src/syscalls/ffi-types-unix.lisp b/src/syscalls/ffi-types-unix.lisp
index 5318838..6f06528 100644
--- a/src/syscalls/ffi-types-unix.lisp
+++ b/src/syscalls/ffi-types-unix.lisp
@@ -105,7 +105,7 @@
  (:enetunreach "ENETUNREACH")
  (:enfile "ENFILE")
  (:enobufs "ENOBUFS")
- #-dragonfly
+ #-(or freebsd dragonfly)
  (:enodata "ENODATA")
  (:enodev "ENODEV")
  (:enoent "ENOENT")
@@ -117,9 +117,9 @@
  (:enonet "ENONET" :optional t)
  (:enoprotoopt "ENOPROTOOPT")
  (:enospc "ENOSPC")
- #-dragonfly
+ #-(or freebsd dragonfly)
  (:enosr "ENOSR")
- #-dragonfly
+ #-(or freebsd dragonfly)
  (:enostr "ENOSTR")
  (:enosys "ENOSYS")
  (:enotconn "ENOTCONN")
@@ -142,7 +142,7 @@
  (:espipe "ESPIPE")
  (:esrch "ESRCH")
  (:estale "ESTALE")
- #-dragonfly
+ #-(or freebsd dragonfly)
  (:etime "ETIME")
  (:etimedout "ETIMEDOUT")
  (:etxtbsy "ETXTBSY")
diff --git a/src/syscalls/pkgdcl.lisp b/src/syscalls/pkgdcl.lisp
index cd9265b..03ac79d 100644
--- a/src/syscalls/pkgdcl.lisp
+++ b/src/syscalls/pkgdcl.lisp
@@ -99,13 +99,17 @@
    #:ehostunreach #:eidrm #:eilseq #:einprogress #:eintr #:einval #:eio
    #:eisconn #:eisdir #:eloop #:emfile #:emlink #:emsgsize #:emultihop
    #:enametoolong #:enetdown #:enetreset #:enetunreach #:enfile
-   #:enobufs #-dragonfly #:enodata #:enodev #:enoent #:enoexec #:enolck #:enolink
-   #:enomem #:enomsg #:enonet #:enoprotoopt #:enospc #-dragonfly #:enosr #-dragonfly #:enostr
+   #:enobufs #:enodev #:enoent #:enoexec #:enolck #:enolink
+   #:enomem #:enomsg #:enonet #:enoprotoopt #:enospc
    #:enosys #:enotconn #:enotdir #:enotempty #:enotsock #:enotsup #:enotty
    #:enxio #:eopnotsupp #:eoverflow #:eperm #:epipe #:eproto
    #:eprotonosupport #:eprototype #:erange #:erofs #:eshutdown #:espipe
-   #:esrch #:estale #-dragonfly #:etime #:etimedout #:etxtbsy #:ewouldblock #:exdev
-   #:ebug)
+   #:esrch #:estale #:etimedout #:etxtbsy #:ewouldblock #:exdev
+   #:ebug
+   #-(or freebsd dragonfly) #:enodata
+   #-(or freebsd dragonfly) #:enosr
+   #-(or freebsd dragonfly) #:enostr
+   #-(or freebsd dragonfly) #:etime)
   (:export ;; fcntl.h
    ;; Open()
    #:o-rdonly
-- 
2.11.4.GIT