1.0.35.10: d_ino access in SB-POSIX

Thanks to Philipp Marek and Pierre THIERRY for independent, nearly
identical patches.

diff --git a/NEWS b/NEWS
index 1c3736d..ac7a6a6 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -1,5 +1,7 @@
 ;;;; -*- coding: utf-8; fill-column: 78 -*-
 changes relative to sbcl-1.0.35:
+  * new feature: SB-POSIX now supports accessing the d_ino member of
+    dirent structures.  (Thanks to Philipp Marek and Pierre THEIRRY)
   * new feature: MAKE-RANDOM-STATE has been extended to accept octet vectors,
     (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)), and UNSIGNED-BYTE arguments in
     addition to the ones documented in the language specification.  Also,

diff --git a/contrib/sb-posix/constants.lisp b/contrib/sb-posix/constants.lisp
index 2dba2d6..138625e 100644 (file)
--- a/contrib/sb-posix/constants.lisp
+++ b/contrib/sb-posix/constants.lisp
@@ -270,6 +270,7 @@
  (:structure dirent
              (#+(and linux largefile) "struct dirent64"
               #-(and linux largefile) "struct dirent"
+              (:ino-t ino "ino_t" "d_ino")
               (:c-string name "char *" "d_name"
                          :distrust-length #+sunos t #-sunos nil)) t)
 

diff --git a/contrib/sb-posix/defpackage.lisp b/contrib/sb-posix/defpackage.lisp
index 429df93..fa4926b 100644 (file)
--- a/contrib/sb-posix/defpackage.lisp
+++ b/contrib/sb-posix/defpackage.lisp
@@ -9,7 +9,7 @@
            #:filename
 
            ;; grovel structure accessors
-           #:dirent-name
+           #:dirent-name #:dirent-ino
 
            ;; wrapper class accessors
            #:passwd-name #:passwd-passwd #:passwd-uid #:passwd-gid

diff --git a/version.lisp-expr b/version.lisp-expr
index 4b64855..d54e0a9 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.35.9"
+"1.0.35.10"