From 22de9286aa239843ab7bc2cb772009fba6bcd080 Mon Sep 17 00:00:00 2001 From: Nathan Froyd Date: Thu, 11 Feb 2010 03:37:26 +0000 Subject: [PATCH] 1.0.35.10: d_ino access in SB-POSIX Thanks to Philipp Marek and Pierre THIERRY for independent, nearly identical patches. --- NEWS | 2 ++ contrib/sb-posix/constants.lisp | 1 + contrib/sb-posix/defpackage.lisp | 2 +- version.lisp-expr | 2 +- 4 files changed, 5 insertions(+), 2 deletions(-) diff --git a/NEWS b/NEWS index 1c3736d..ac7a6a6 100644 --- 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 --- 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 --- 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 --- 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" -- 1.7.10.4