annotate src/ndir.h @ 108765:d835100c3e8b

Replace Lisp calls to delete-backward-char by delete-char. * bs.el, expand.el, ido.el, image-dired.el, lpr.el, pcomplete.el, skeleton.el, term.el, time.el, wid-edit.el, woman.el, calc/calc-graph.el, calc/calc-help.el, calc/calc-incom.el, calc/calc.el, emacs-cl-extra.el, emacs-cl-loaddefs.el, emulation/cua-rect.el, emulation/viper-ex.el, eshell/esh-test.el, eshell/eshell.el, gnus/gnus-uu.el, gnus/nndoc.el, gnus/nnrss.el, gnus/rfc2047.el, gnus/utf7.el, international/utf-7.el, language/ethio-util.el, mh-e/mh-alias.el, mh-e/mh-search.el, net/imap.el, net/rcirc.el, obsolete/complete.el, play/decipher.el, progmodes/ada-mode.el, progmodes/cc-awk.el, progmodes/dcl-mode.el, progmodes/ps-mode.el, progmodes/verilog-mode.el, progmodes/vhdl-mode.el, textmodes/bibtex.el, textmodes/fill.el, textmodes/reftex-auc.el, textmodes/rst.el, textmodes/sgml-mode.el, textmodes/table.el, textmodes/texinfmt.el: Replace Lisp calls to delete-backward-char by calls to delete-char.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 24 May 2010 22:11:08 -0400
parents c3512b2085a0
children 68ca98ae70fb
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1 /*
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
2 <dir.h> -- definitions for 4.2BSD-compatible directory access
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
3
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
4 last edit: 09-Jul-1983 D A Gwyn
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5
75764
9511dc88835c Add legal comment on copyright issue.
Glenn Morris <rgm@gnu.org>
parents: 52401
diff changeset
6 * The code here is forced by the interface, and is not subject to
9511dc88835c Add legal comment on copyright issue.
Glenn Morris <rgm@gnu.org>
parents: 52401
diff changeset
7 * copyright, constituting the only possible expression of the
9511dc88835c Add legal comment on copyright issue.
Glenn Morris <rgm@gnu.org>
parents: 52401
diff changeset
8 * algorithm in this format.
9511dc88835c Add legal comment on copyright issue.
Glenn Morris <rgm@gnu.org>
parents: 52401
diff changeset
9 */
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
10
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
11 #define DIRBLKSIZ 512 /* size of directory block */
9792
b8fc349121d1 (MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents: 5877
diff changeset
12 #ifdef WINDOWSNT
b8fc349121d1 (MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents: 5877
diff changeset
13 #define MAXNAMLEN 255
b8fc349121d1 (MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents: 5877
diff changeset
14 #else /* not WINDOWSNT */
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
15 #define MAXNAMLEN 15 /* maximum filename length */
9792
b8fc349121d1 (MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents: 5877
diff changeset
16 #endif /* not WINDOWSNT */
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
17 /* NOTE: MAXNAMLEN must be one less than a multiple of 4 */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
18
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
19 struct direct /* data from readdir() */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
20 {
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
21 long d_ino; /* inode number of entry */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
22 unsigned short d_reclen; /* length of this record */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
23 unsigned short d_namlen; /* length of string in d_name */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
24 char d_name[MAXNAMLEN+1]; /* name of file */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
25 };
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
26
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
27 typedef struct
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
28 {
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
29 int dd_fd; /* file descriptor */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
30 int dd_loc; /* offset in block */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
31 int dd_size; /* amount of valid data */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
32 char dd_buf[DIRBLKSIZ]; /* directory block */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
33 } DIR; /* stream data from opendir() */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
34
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
35 extern DIR *opendir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
36 extern struct direct *readdir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
37 extern long telldir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
38 extern void seekdir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
39 extern void closedir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
40
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
41 #define rewinddir( dirp ) seekdir( dirp, 0L )
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 9792
diff changeset
42
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 9792
diff changeset
43 /* arch-tag: aea50570-ffb7-43fd-b423-7743b10fbe6e
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 9792
diff changeset
44 (do not change this comment) */