* dired.c (compile_pattern): Move decl from here ...

* lisp.h: ... to here, so that it can be checked.
(struct re_registers): New forward decl.

diff --git a/src/ChangeLog b/src/ChangeLog
index d4f8061ed026aaacd7311981d3efb00bdc284a8b..ba863ba57102dad5b5e1339c5c1f04aaa52451d4 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,9 @@
 2011-03-15  Paul Eggert  <eggert@cs.ucla.edu>
 
+       * dired.c (compile_pattern): Move decl from here ...
+       * lisp.h: ... to here, so that it can be checked.
+       (struct re_registers): New forward decl.
+
        * character.h (INC_POS, DEC_POS): Rename locals to avoid shadowing.
 
        * indent.c (MULTIBYTE_BYTES_WIDTH): New args bytes, width.

diff --git a/src/dired.c b/src/dired.c
index 4080e1711e0a36ec604c548de2c0544cab652553..3e2ce5e96a6ea82653f7251b0b8a1a93ff8ed66f 100644 (file)
--- a/src/dired.c
+++ b/src/dired.c
@@ -79,11 +79,6 @@ extern struct direct *readdir (DIR *);
 #include "regex.h"
 #include "blockinput.h"
 
-/* Returns a search buffer, with a fastmap allocated and ready to go.  */
-extern struct re_pattern_buffer *compile_pattern (Lisp_Object,
-                                                 struct re_registers *,
-                                                 Lisp_Object, int, int);
-
 Lisp_Object Qdirectory_files;
 Lisp_Object Qdirectory_files_and_attributes;
 Lisp_Object Qfile_name_completion;

diff --git a/src/lisp.h b/src/lisp.h
index ddaf0438b00c84ff0333f7a251b8336763c11244..ec45b83863b075c398411132c4849ac06800dd98 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -3025,6 +3025,10 @@ EXFUN (Fset_match_data, 2);
 EXFUN (Fmatch_beginning, 1);
 EXFUN (Fmatch_end, 1);
 extern void record_unwind_save_match_data (void);
+struct re_registers;
+extern struct re_pattern_buffer *compile_pattern (Lisp_Object,
+                                                 struct re_registers *,
+                                                 Lisp_Object, int, int);
 extern int fast_string_match (Lisp_Object, Lisp_Object);
 extern int fast_c_string_match_ignore_case (Lisp_Object, const char *);
 extern int fast_string_match_ignore_case (Lisp_Object, Lisp_Object);