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

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

3 files changed, 8 insertions, 5 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index d4f8061ed02..ba863ba5710 100644
--- 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 4080e1711e0..3e2ce5e96a6 100644
--- 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 ddaf0438b00..ec45b83863b 100644
--- 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);