From dbd37a958fc17c793003ea95ad61ae51cff5ff45 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Tue, 15 Mar 2011 11:08:06 -0700 Subject: [PATCH] * dired.c (compile_pattern): Move decl from here ... * lisp.h: ... to here, so that it can be checked. (struct re_registers): New forward decl. --- src/ChangeLog | 4 ++++ src/dired.c | 5 ----- src/lisp.h | 4 ++++ 3 files changed, 8 insertions(+), 5 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index d4f8061ed0..ba863ba571 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,9 @@ 2011-03-15 Paul Eggert + * 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 4080e1711e..3e2ce5e96a 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 ddaf0438b0..ec45b83863 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); -- 2.20.1