diff options
| author | Paul Eggert | 2012-08-26 03:04:27 -0700 |
|---|---|---|
| committer | Paul Eggert | 2012-08-26 03:04:27 -0700 |
| commit | b52d698579bbf035a70fb62440e154a06979b919 (patch) | |
| tree | 71c36e614ee268bbe76f93377fc50edd3444b055 /src | |
| parent | 67dbec33441a9594c39778f642e196e304341b4a (diff) | |
| download | emacs-b52d698579bbf035a70fb62440e154a06979b919.tar.gz emacs-b52d698579bbf035a70fb62440e154a06979b919.zip | |
Remove unused external symbols.
* data.c (Qcons, Qfloat, Qmisc, Qstring, Qvector):
* window.c (Qwindow_valid_p, decode_valid_window):
Now static, not extern.
* data.c (Qinterval): Remove; unused.
(syms_of_data): Do not define 'interval'.
* lisp.h (Qinteger, Qstring, Qmisc, Qvector, Qfloat, Qcons):
* window.h (decode_valid_window):
Remove decls.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 10 | ||||
| -rw-r--r-- | src/data.c | 6 | ||||
| -rw-r--r-- | src/lisp.h | 3 | ||||
| -rw-r--r-- | src/window.c | 5 | ||||
| -rw-r--r-- | src/window.h | 1 |
5 files changed, 16 insertions, 9 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index c94a6d7495f..21aec9cb3c5 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,5 +1,15 @@ | |||
| 1 | 2012-08-26 Paul Eggert <eggert@cs.ucla.edu> | 1 | 2012-08-26 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 2 | ||
| 3 | Remove unused external symbols. | ||
| 4 | * data.c (Qcons, Qfloat, Qmisc, Qstring, Qvector): | ||
| 5 | * window.c (Qwindow_valid_p, decode_valid_window): | ||
| 6 | Now static, not extern. | ||
| 7 | * data.c (Qinterval): Remove; unused. | ||
| 8 | (syms_of_data): Do not define 'interval'. | ||
| 9 | * lisp.h (Qinteger, Qstring, Qmisc, Qvector, Qfloat, Qcons): | ||
| 10 | * window.h (decode_valid_window): | ||
| 11 | Remove decls. | ||
| 12 | |||
| 3 | * character.c, charset.c, chartab.c: Use bool for booleans. | 13 | * character.c, charset.c, chartab.c: Use bool for booleans. |
| 4 | * character.c (lisp_string_width, string_count_byte8) | 14 | * character.c (lisp_string_width, string_count_byte8) |
| 5 | (string_escape_byte8): | 15 | (string_escape_byte8): |
diff --git a/src/data.c b/src/data.c index f812c280b40..f121d8772c6 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -83,8 +83,8 @@ Lisp_Object Qoverflow_error, Qunderflow_error; | |||
| 83 | Lisp_Object Qfloatp; | 83 | Lisp_Object Qfloatp; |
| 84 | Lisp_Object Qnumberp, Qnumber_or_marker_p; | 84 | Lisp_Object Qnumberp, Qnumber_or_marker_p; |
| 85 | 85 | ||
| 86 | Lisp_Object Qinteger, Qinterval, Qfloat, Qvector; | 86 | Lisp_Object Qinteger, Qsymbol; |
| 87 | Lisp_Object Qsymbol, Qstring, Qcons, Qmisc; | 87 | static Lisp_Object Qcons, Qfloat, Qmisc, Qstring, Qvector; |
| 88 | Lisp_Object Qwindow; | 88 | Lisp_Object Qwindow; |
| 89 | static Lisp_Object Qoverlay, Qwindow_configuration; | 89 | static Lisp_Object Qoverlay, Qwindow_configuration; |
| 90 | static Lisp_Object Qprocess, Qmarker; | 90 | static Lisp_Object Qprocess, Qmarker; |
| @@ -3090,8 +3090,6 @@ syms_of_data (void) | |||
| 3090 | DEFSYM (Qchar_table, "char-table"); | 3090 | DEFSYM (Qchar_table, "char-table"); |
| 3091 | DEFSYM (Qbool_vector, "bool-vector"); | 3091 | DEFSYM (Qbool_vector, "bool-vector"); |
| 3092 | DEFSYM (Qhash_table, "hash-table"); | 3092 | DEFSYM (Qhash_table, "hash-table"); |
| 3093 | /* Used by Fgarbage_collect. */ | ||
| 3094 | DEFSYM (Qinterval, "interval"); | ||
| 3095 | DEFSYM (Qmisc, "misc"); | 3093 | DEFSYM (Qmisc, "misc"); |
| 3096 | 3094 | ||
| 3097 | DEFSYM (Qdefun, "defun"); | 3095 | DEFSYM (Qdefun, "defun"); |
diff --git a/src/lisp.h b/src/lisp.h index 4437fa44b6d..5b842d371a2 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -2573,8 +2573,7 @@ extern Lisp_Object Qoverflow_error, Qunderflow_error; | |||
| 2573 | extern Lisp_Object Qfloatp; | 2573 | extern Lisp_Object Qfloatp; |
| 2574 | extern Lisp_Object Qnumberp, Qnumber_or_marker_p; | 2574 | extern Lisp_Object Qnumberp, Qnumber_or_marker_p; |
| 2575 | 2575 | ||
| 2576 | extern Lisp_Object Qinteger, Qinterval, Qsymbol, Qstring; | 2576 | extern Lisp_Object Qbuffer, Qinteger, Qsymbol; |
| 2577 | extern Lisp_Object Qmisc, Qvector, Qfloat, Qcons, Qbuffer; | ||
| 2578 | 2577 | ||
| 2579 | extern Lisp_Object Qfont_spec, Qfont_entity, Qfont_object; | 2578 | extern Lisp_Object Qfont_spec, Qfont_entity, Qfont_object; |
| 2580 | 2579 | ||
diff --git a/src/window.c b/src/window.c index 4d92566b243..4792e3bbea8 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -54,7 +54,8 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 54 | #include "nsterm.h" | 54 | #include "nsterm.h" |
| 55 | #endif | 55 | #endif |
| 56 | 56 | ||
| 57 | Lisp_Object Qwindowp, Qwindow_live_p, Qwindow_valid_p; | 57 | Lisp_Object Qwindowp, Qwindow_live_p; |
| 58 | static Lisp_Object Qwindow_valid_p; | ||
| 58 | static Lisp_Object Qwindow_configuration_p, Qrecord_window_buffer; | 59 | static Lisp_Object Qwindow_configuration_p, Qrecord_window_buffer; |
| 59 | static Lisp_Object Qwindow_deletable_p, Qdelete_window, Qdisplay_buffer; | 60 | static Lisp_Object Qwindow_deletable_p, Qdelete_window, Qdisplay_buffer; |
| 60 | static Lisp_Object Qreplace_buffer_in_windows, Qget_mru_window; | 61 | static Lisp_Object Qreplace_buffer_in_windows, Qget_mru_window; |
| @@ -268,7 +269,7 @@ decode_any_window (register Lisp_Object window) | |||
| 268 | return w; | 269 | return w; |
| 269 | } | 270 | } |
| 270 | 271 | ||
| 271 | struct window * | 272 | static struct window * |
| 272 | decode_valid_window (register Lisp_Object window) | 273 | decode_valid_window (register Lisp_Object window) |
| 273 | { | 274 | { |
| 274 | struct window *w; | 275 | struct window *w; |
diff --git a/src/window.h b/src/window.h index 28b9678b667..dfb88b2cf3c 100644 --- a/src/window.h +++ b/src/window.h | |||
| @@ -972,7 +972,6 @@ struct glyph *get_phys_cursor_glyph (struct window *w); | |||
| 972 | extern Lisp_Object Qwindowp, Qwindow_live_p; | 972 | extern Lisp_Object Qwindowp, Qwindow_live_p; |
| 973 | extern Lisp_Object Vwindow_list; | 973 | extern Lisp_Object Vwindow_list; |
| 974 | 974 | ||
| 975 | extern struct window *decode_valid_window (Lisp_Object); | ||
| 976 | extern struct window *decode_live_window (Lisp_Object); | 975 | extern struct window *decode_live_window (Lisp_Object); |
| 977 | extern int compare_window_configurations (Lisp_Object, Lisp_Object, int); | 976 | extern int compare_window_configurations (Lisp_Object, Lisp_Object, int); |
| 978 | extern void mark_window_cursors_off (struct window *); | 977 | extern void mark_window_cursors_off (struct window *); |