comparison src/dired.c @ 14036:621a575db6f7

Comment fixes.
author Karl Heuer <kwzh@gnu.org>
date Fri, 05 Jan 1996 10:03:17 +0000
parents 93b67f07b194
children afef050ad4e6
comparison
equal deleted inserted replaced
14035:09cb73d0ec41 14036:621a575db6f7
150 if (!NILP (match)) 150 if (!NILP (match))
151 { 151 {
152 CHECK_STRING (match, 3); 152 CHECK_STRING (match, 3);
153 153
154 /* MATCH might be a flawed regular expression. Rather than 154 /* MATCH might be a flawed regular expression. Rather than
155 catching and signalling our own errors, we just call 155 catching and signaling our own errors, we just call
156 compile_pattern to do the work for us. */ 156 compile_pattern to do the work for us. */
157 #ifdef VMS 157 #ifdef VMS
158 bufp = compile_pattern (match, 0, 158 bufp = compile_pattern (match, 0,
159 buffer_defaults.downcase_table->contents, 0); 159 buffer_defaults.downcase_table->contents, 0);
160 #else 160 #else
164 164
165 /* Now *bufp is the compiled form of MATCH; don't call anything 165 /* Now *bufp is the compiled form of MATCH; don't call anything
166 which might compile a new regexp until we're done with the loop! */ 166 which might compile a new regexp until we're done with the loop! */
167 167
168 /* Do this opendir after anything which might signal an error; if 168 /* Do this opendir after anything which might signal an error; if
169 an error is signalled while the directory stream is open, we 169 an error is signaled while the directory stream is open, we
170 have to make sure it gets closed, and setting up an 170 have to make sure it gets closed, and setting up an
171 unwind_protect to do so would be a pain. */ 171 unwind_protect to do so would be a pain. */
172 d = opendir (XSTRING (dirfilename)->data); 172 d = opendir (XSTRING (dirfilename)->data);
173 if (! d) 173 if (! d)
174 report_file_error ("Opening directory", Fcons (dirname, Qnil)); 174 report_file_error ("Opening directory", Fcons (dirname, Qnil));