diff options
| author | Richard M. Stallman | 1997-05-19 02:17:26 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-05-19 02:17:26 +0000 |
| commit | 4c637faa2450d3ee867cbb0fabfb57213817a2f7 (patch) | |
| tree | 5f30009d65ee47655ac793018faecf312dcda262 /src | |
| parent | ecb4dd9a350f1f36aca706d03f7cc1a9d50b5b23 (diff) | |
| download | emacs-4c637faa2450d3ee867cbb0fabfb57213817a2f7.tar.gz emacs-4c637faa2450d3ee867cbb0fabfb57213817a2f7.zip | |
(Ffile_attributes): Return inode number as a cons only if necessary.
Diffstat (limited to 'src')
| -rw-r--r-- | src/dired.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/dired.c b/src/dired.c index a10e94931f0..ea0624dd535 100644 --- a/src/dired.c +++ b/src/dired.c | |||
| @@ -685,14 +685,14 @@ If file does not exist, returns nil.") | |||
| 685 | #ifdef BSD4_3 | 685 | #ifdef BSD4_3 |
| 686 | #undef BSD4_2 /* ok, you can look again without throwing up */ | 686 | #undef BSD4_2 /* ok, you can look again without throwing up */ |
| 687 | #endif | 687 | #endif |
| 688 | #if 1 | 688 | if (s.st_ino & ((-1) << VALBITS)) |
| 689 | /* To allow inode numbers larger than VALBITS, separate the bottom | 689 | /* To allow inode numbers larger than VALBITS, separate the bottom |
| 690 | 16 bits. */ | 690 | 16 bits. */ |
| 691 | values[10] = Fcons (make_number (s.st_ino >> 16), | 691 | values[10] = Fcons (make_number (s.st_ino >> 16), |
| 692 | make_number (s.st_ino & 0xffff)); | 692 | make_number (s.st_ino & 0xffff)); |
| 693 | #else | 693 | else |
| 694 | values[10] = make_number (s.st_ino); | 694 | /* But keep the most common cases as integers. */ |
| 695 | #endif | 695 | values[10] = make_number (s.st_ino); |
| 696 | values[11] = make_number (s.st_dev); | 696 | values[11] = make_number (s.st_dev); |
| 697 | return Flist (sizeof(values) / sizeof(values[0]), values); | 697 | return Flist (sizeof(values) / sizeof(values[0]), values); |
| 698 | } | 698 | } |