Move declarations from .c files to .h files.

* src/process.c (timers_run):
* src/minibuf.c (quit_char):
* src/lread.c (read_emacs_mule_char):
* src/keyboard.c (minibuf_level, message_enable_multibyte)
(pending_malloc_warning):
* src/insdel.c (Vselect_active_regions, Vsaved_region_selection)
(Qonly): Remove declarations.
* src/lisp.h (pending_malloc_warning, Vsaved_region_selection)
(Vselect_active_regions):
* src/keyboard.h (timers_run):  Add declarations.

diff --git a/src/ChangeLog b/src/ChangeLog
index 8753246c92ba9c44945dd6322d627103dae30e14..304176a40ebb0a105df24404dfa8fc0dabcfdf1b 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,17 @@
 2010-11-18  Dan Nicolaescu  <dann@ics.uci.edu>
 
+       Move declarations from .c files to .h files.
+       * process.c (timers_run):
+       * minibuf.c (quit_char):
+       * lread.c (read_emacs_mule_char):
+       * keyboard.c (minibuf_level, message_enable_multibyte)
+       (pending_malloc_warning):
+       * insdel.c (Vselect_active_regions, Vsaved_region_selection)
+       (Qonly): Remove declarations.
+       * lisp.h (pending_malloc_warning, Vsaved_region_selection)
+       (Vselect_active_regions):
+       * keyboard.h (timers_run):  Add declarations.
+
        * strftime.c (my_strftime_gmtime_r, my_strftime_localtime_r)
        (tm_diff): Convert definitions to standard C.
        (extra_args_spec_iso): Remove, unused.

diff --git a/src/insdel.c b/src/insdel.c
index ff380ada1928eb96011b36cd08884d8f832cdd9f..b62889082fd0fb1a6cce4077db3d12433ed36599 100644 (file)
--- a/src/insdel.c
+++ b/src/insdel.c
@@ -73,9 +73,6 @@ Lisp_Object combine_after_change_list;
 Lisp_Object combine_after_change_buffer;
 
 Lisp_Object Qinhibit_modification_hooks;
-
-extern Lisp_Object Vselect_active_regions, Vsaved_region_selection, Qonly;
-
 \f
 /* Check all markers in the current buffer, looking for something invalid.  */
 
@@ -2395,5 +2392,3 @@ as well as hooks attached to text properties and overlays.  */);
   defsubr (&Scombine_after_change_execute);
 }
 
-/* arch-tag: 9b34b886-47d7-465e-a234-299af411b23d
-   (do not change this comment) */

diff --git a/src/keyboard.c b/src/keyboard.c
index 0a6831750de6f2e09e66995cf7e3a39a6e0d4f63..ec5c24511c40ef4dbf23ba08be2b73059921fb2f 100644 (file)
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -144,10 +144,6 @@ int this_single_command_key_start;
 static int before_command_key_count;
 static int before_command_echo_length;
 
-extern int minbuf_level;
-
-extern int message_enable_multibyte;
-
 /* If non-nil, the function that implements the display of help.
    It's called with one argument, the help string to display.  */
 
@@ -431,8 +427,6 @@ FILE *dribble;
 /* Nonzero if input is available.  */
 int input_pending;
 
-extern const char *pending_malloc_warning;
-
 /* Circular buffer for pre-read keyboard input.  */
 
 static struct input_event kbd_buffer[KBD_BUFFER_SIZE];
@@ -12434,5 +12428,3 @@ mark_kboards (void)
   }
 }
 
-/* arch-tag: 774e34d7-6d31-42f3-8397-e079a4e4c9ca
-   (do not change this comment) */

diff --git a/src/keyboard.h b/src/keyboard.h
index 9fd3b48eba943acca531cfd2b2f25c6db146b2ed..7f36691a5a3f53a3435287d3c6632fc079c54990 100644 (file)
--- a/src/keyboard.h
+++ b/src/keyboard.h
@@ -490,6 +490,8 @@ extern unsigned long last_event_timestamp;
 
 extern int quit_char;
 
+extern int timers_run;
+
 extern int parse_menu_item (Lisp_Object, int);
 
 extern void echo_now (void);
@@ -534,5 +536,3 @@ extern int tty_read_avail_input (struct terminal *, int,
                                  struct input_event *);
 extern EMACS_TIME timer_check (int);
 
-/* arch-tag: 769cbade-1ba9-4950-b886-db265b061aa3
-   (do not change this comment) */

diff --git a/src/lisp.h b/src/lisp.h
index 6c00aa28c46944812da4912264327d5afb3be4e4..8ddd7af79a8e98cf57f3d87984af94f18d2c9064 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -2736,6 +2736,7 @@ extern void memory_full (void) NO_RETURN;
 extern void buffer_memory_full (void) NO_RETURN;
 extern int survives_gc_p (Lisp_Object);
 extern void mark_object (Lisp_Object);
+extern const char *pending_malloc_warning;
 extern Lisp_Object Vpurify_flag;
 extern Lisp_Object Vmemory_full;
 extern Lisp_Object *stack_base;
@@ -3233,6 +3234,8 @@ extern Lisp_Object Qdisabled, QCfilter;
 extern Lisp_Object Qabove_handle, Qhandle, Qbelow_handle;
 extern Lisp_Object Qup, Qdown, Qbottom, Qend_scroll;
 extern Lisp_Object Qtop, Qratio;
+extern Lisp_Object Vsaved_region_selection;
+extern Lisp_Object Vselect_active_regions;
 extern Lisp_Object Vtty_erase_char, Vhelp_form, Vtop_level;
 extern Lisp_Object Vthrow_on_input;
 extern int input_pending;

diff --git a/src/lread.c b/src/lread.c
index 945808c6e5aa1250f9ecae4c689af99d41ab97db..18d4ba8360e9937c79762e60c24998764cddfa52 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -552,8 +552,6 @@ readbyte_from_string (int c, Lisp_Object readcharfun)
    encoded in `emacs-mule' and the first byte is already read in
    C.  */
 
-extern char emacs_mule_bytes[256];
-
 static int
 read_emacs_mule_char (int c, int (*readbyte) (int, Lisp_Object), Lisp_Object readcharfun)
 {

diff --git a/src/minibuf.c b/src/minibuf.c
index f3a24afc19910e908394516bacd39838d68cd79d..0f3def614f257c1a83f73f07bfaa4e0feb5ed01c 100644 (file)
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -36,8 +36,6 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 #include "keymap.h"
 #include "termhooks.h"
 
-extern int quit_char;
-
 /* List of buffers for use as minibuffers.
    The first element of the list is used for the outermost minibuffer
    invocation, the next element is used for a recursive minibuffer
@@ -2242,5 +2240,3 @@ properties.  */);
   defsubr (&Scompleting_read);
 }
 
-/* arch-tag: 8f69b601-fba3-484c-a6dd-ceaee54a7a73
-   (do not change this comment) */

diff --git a/src/process.c b/src/process.c
index c38b94a9cb13c02833a612d9a4233f27a38328b0..f8ca0958dd1456931dd242a8cbb504ccdb5f227d 100644 (file)
--- a/src/process.c
+++ b/src/process.c
@@ -113,8 +113,6 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 #include "nsterm.h"
 #endif
 
-extern int timers_run;
-
 Lisp_Object Qeuid, Qegid, Qcomm, Qstate, Qppid, Qpgrp, Qsess, Qttname, Qtpgid;
 Lisp_Object Qminflt, Qmajflt, Qcminflt, Qcmajflt, Qutime, Qstime, Qcstime;
 Lisp_Object Qcutime, Qpri, Qnice, Qthcount, Qstart, Qvsize, Qrss, Qargs;
@@ -7744,5 +7742,3 @@ The variable takes effect when `start-process' is called.  */);
   defsubr (&Sprocess_attributes);
 }
 
-/* arch-tag: 3706c011-7b9a-4117-bd4f-59e7f701a4c4
-   (do not change this comment) */