Mercurial > hg > xemacs-beta
comparison src/dired.c @ 173:8eaf7971accc r20-3b13
Import from CVS: tag r20-3b13
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:49:09 +0200 |
parents | cca96a509cfe |
children | 3d6bfa290dbd |
comparison
equal
deleted
inserted
replaced
172:a38aed19690b | 173:8eaf7971accc |
---|---|
56 /* This function can GC. GC checked 1997.04.06. */ | 56 /* This function can GC. GC checked 1997.04.06. */ |
57 DIR *d; | 57 DIR *d; |
58 Bytecount dirname_length; | 58 Bytecount dirname_length; |
59 Lisp_Object list, name, dirfilename = Qnil; | 59 Lisp_Object list, name, dirfilename = Qnil; |
60 Lisp_Object handler; | 60 Lisp_Object handler; |
61 struct re_pattern_buffer *bufp; | 61 struct re_pattern_buffer *bufp = NULL; |
62 | 62 |
63 char statbuf [MAXNAMLEN+2]; | 63 char statbuf [MAXNAMLEN+2]; |
64 char *statbuf_tail; | 64 char *statbuf_tail; |
65 Lisp_Object tail_cons = Qnil; | 65 Lisp_Object tail_cons = Qnil; |
66 char slashfilename[MAXNAMLEN+2]; | 66 char slashfilename[MAXNAMLEN+2]; |
297 if (S_ISLNK (st_addr->st_mode)) | 297 if (S_ISLNK (st_addr->st_mode)) |
298 stat (fullname, st_addr); | 298 stat (fullname, st_addr); |
299 #else | 299 #else |
300 value = stat (fullname, st_addr); | 300 value = stat (fullname, st_addr); |
301 #endif | 301 #endif |
302 return (value); | 302 return value; |
303 } | 303 } |
304 | 304 |
305 static Lisp_Object | 305 static Lisp_Object |
306 file_name_completion (Lisp_Object file, Lisp_Object dirname, int all_flag, | 306 file_name_completion (Lisp_Object file, Lisp_Object dirname, int all_flag, |
307 int ver_flag) | 307 int ver_flag) |