Commit a2cb4e63 authored by Paul Eggert's avatar Paul Eggert

* charset.h (charset_iso_8859_1): Remove decl.

* charset.c (charset_iso_8859_1, charset_emacs, map_charset_for_dump):
Now static.
parent 127198fd
2011-04-11 Paul Eggert <eggert@cs.ucla.edu>
* charset.h (charset_iso_8859_1): Remove decl.
* charset.c (charset_iso_8859_1, charset_emacs, map_charset_for_dump):
Now static.
* ccl.h (check_ccl_update, Vccl_program_table): Remove decls.
* ccl.c (Vccl_program_table): Now static.
(check_ccl_update): Remove; unused.
......
......@@ -76,9 +76,9 @@ static Lisp_Object Qemacs;
/* The corresponding charsets. */
int charset_ascii;
int charset_eight_bit;
int charset_iso_8859_1;
static int charset_iso_8859_1;
int charset_unicode;
int charset_emacs;
static int charset_emacs;
/* The other special charsets. */
int charset_jisx0201_roman;
......@@ -652,12 +652,10 @@ DEFUN ("charsetp", Fcharsetp, Scharsetp, 1, 1, 0,
}
void map_charset_for_dump (void (*c_function) (Lisp_Object, Lisp_Object),
Lisp_Object function, Lisp_Object arg,
unsigned from, unsigned to);
void
map_charset_for_dump (void (*c_function) (Lisp_Object, Lisp_Object), Lisp_Object function, Lisp_Object arg, unsigned int from, unsigned int to)
static void
map_charset_for_dump (void (*c_function) (Lisp_Object, Lisp_Object),
Lisp_Object function, Lisp_Object arg,
unsigned int from, unsigned int to)
{
int from_idx = CODE_POINT_TO_INDEX (temp_charset_work->current, from);
int to_idx = CODE_POINT_TO_INDEX (temp_charset_work->current, to);
......
......@@ -519,7 +519,6 @@ extern Lisp_Object Qcharsetp;
extern Lisp_Object Qascii;
extern int charset_ascii, charset_eight_bit;
extern int charset_iso_8859_1;
extern int charset_unicode;
extern int charset_jisx0201_roman;
extern int charset_jisx0208_1978;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment