Mercurial > emacs
changeset 16532:ffdfedf6de8f
(Ffile_attributes): Represent inode number as a pair of
integers in case inode numbers do not fit in a Lisp integer.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 07 Nov 1996 05:46:56 +0000 |
| parents | fc59b39a6d64 |
| children | aa23842d0e1a |
| files | src/dired.c |
| diffstat | 1 files changed, 7 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/dired.c Thu Nov 07 04:21:08 1996 +0000 +++ b/src/dired.c Thu Nov 07 05:46:56 1996 +0000 @@ -684,7 +684,14 @@ #ifdef BSD4_3 #undef BSD4_2 /* ok, you can look again without throwing up */ #endif +#if 1 + /* To allow inode numbers larger than VALBITS, separate the bottom + 16 bits. */ + values[10] = Fcons (make_number (s.st_ino >> 16), + make_number (s.st_ino & 0xffff)); +#else values[10] = make_number (s.st_ino); +#endif values[11] = make_number (s.st_dev); return Flist (sizeof(values) / sizeof(values[0]), values); }