diff options
| author | Paul Eggert | 2011-04-10 20:39:45 -0700 |
|---|---|---|
| committer | Paul Eggert | 2011-04-10 20:39:45 -0700 |
| commit | 955cbe7b1720f09b2991b7d981147d9cc79d52e3 (patch) | |
| tree | 72ce39606c71e4ace0891f2127a7ef4fca32c209 /src/data.c | |
| parent | 95c82688bc8063f0be5a04baee5ea2a18f9ddf6b (diff) | |
| download | emacs-955cbe7b1720f09b2991b7d981147d9cc79d52e3.tar.gz emacs-955cbe7b1720f09b2991b7d981147d9cc79d52e3.zip | |
Declare Lisp_Object Q* variables to be 'static' if not exproted.
This makes it easier for human readers (and static analyzers)
to see whether these variables are used from other modules.
* alloc.c, buffer.c, bytecode.c, callint.c, casetab.c, category.c:
* ccl.c, character.c, charset.c, cmds.c, coding.c, composite.c:
* data.c, dbusbind.c, dired.c, editfns.c, eval.c, fileio.c, fns.c:
* font.c, frame.c, fringe.c, ftfont.c, image.c, keyboard.c, keymap.c:
* lread.c, macros.c, minibuf.c, print.c, process.c, search.c:
* sound.c, syntax.c, textprop.c, window.c, xdisp.c, xfaces.c, xfns.c:
* xmenu.c, xselect.c:
Declare Q* vars static if they are not used in other modules.
* ccl.h, character.h, charset.h, coding.h, composite.h, font.h:
* frame.h, intervals.h, keyboard.h, lisp.h, process.h, syntax.h:
Remove decls of unexported vars.
* keyboard.h (EVENT_HEAD_UNMODIFIED): Remove now-unused macro.
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 27 |
1 files changed, 17 insertions, 10 deletions
diff --git a/src/data.c b/src/data.c index 25e260c8686..68ceff4d23e 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -52,26 +52,33 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 52 | extern double atof (const char *); | 52 | extern double atof (const char *); |
| 53 | #endif /* !atof */ | 53 | #endif /* !atof */ |
| 54 | 54 | ||
| 55 | Lisp_Object Qnil, Qt, Qquote, Qlambda, Qsubr, Qunbound; | 55 | Lisp_Object Qnil, Qt, Qquote, Qlambda, Qunbound; |
| 56 | static Lisp_Object Qsubr; | ||
| 56 | Lisp_Object Qerror_conditions, Qerror_message, Qtop_level; | 57 | Lisp_Object Qerror_conditions, Qerror_message, Qtop_level; |
| 57 | Lisp_Object Qerror, Qquit, Qwrong_type_argument, Qargs_out_of_range; | 58 | Lisp_Object Qerror, Qquit, Qargs_out_of_range; |
| 58 | Lisp_Object Qvoid_variable, Qvoid_function, Qcyclic_function_indirection; | 59 | static Lisp_Object Qwrong_type_argument; |
| 59 | Lisp_Object Qcyclic_variable_indirection, Qcircular_list; | 60 | Lisp_Object Qvoid_variable, Qvoid_function; |
| 60 | Lisp_Object Qsetting_constant, Qinvalid_read_syntax; | 61 | static Lisp_Object Qcyclic_function_indirection; |
| 62 | static Lisp_Object Qcyclic_variable_indirection; | ||
| 63 | Lisp_Object Qcircular_list; | ||
| 64 | static Lisp_Object Qsetting_constant; | ||
| 65 | Lisp_Object Qinvalid_read_syntax; | ||
| 61 | Lisp_Object Qinvalid_function, Qwrong_number_of_arguments, Qno_catch; | 66 | Lisp_Object Qinvalid_function, Qwrong_number_of_arguments, Qno_catch; |
| 62 | Lisp_Object Qend_of_file, Qarith_error, Qmark_inactive; | 67 | Lisp_Object Qend_of_file, Qarith_error, Qmark_inactive; |
| 63 | Lisp_Object Qbeginning_of_buffer, Qend_of_buffer, Qbuffer_read_only; | 68 | Lisp_Object Qbeginning_of_buffer, Qend_of_buffer, Qbuffer_read_only; |
| 64 | Lisp_Object Qtext_read_only; | 69 | Lisp_Object Qtext_read_only; |
| 65 | 70 | ||
| 66 | Lisp_Object Qintegerp, Qnatnump, Qwholenump, Qsymbolp, Qlistp, Qconsp; | 71 | Lisp_Object Qintegerp, Qwholenump, Qsymbolp, Qlistp, Qconsp; |
| 72 | static Lisp_Object Qnatnump; | ||
| 67 | Lisp_Object Qstringp, Qarrayp, Qsequencep, Qbufferp; | 73 | Lisp_Object Qstringp, Qarrayp, Qsequencep, Qbufferp; |
| 68 | Lisp_Object Qchar_or_string_p, Qmarkerp, Qinteger_or_marker_p, Qvectorp; | 74 | Lisp_Object Qchar_or_string_p, Qmarkerp, Qinteger_or_marker_p, Qvectorp; |
| 69 | Lisp_Object Qbuffer_or_string_p, Qkeywordp; | 75 | Lisp_Object Qbuffer_or_string_p; |
| 70 | Lisp_Object Qboundp, Qfboundp; | 76 | static Lisp_Object Qkeywordp, Qboundp; |
| 77 | Lisp_Object Qfboundp; | ||
| 71 | Lisp_Object Qchar_table_p, Qvector_or_char_table_p; | 78 | Lisp_Object Qchar_table_p, Qvector_or_char_table_p; |
| 72 | 79 | ||
| 73 | Lisp_Object Qcdr; | 80 | Lisp_Object Qcdr; |
| 74 | Lisp_Object Qad_advice_info, Qad_activate_internal; | 81 | static Lisp_Object Qad_advice_info, Qad_activate_internal; |
| 75 | 82 | ||
| 76 | Lisp_Object Qrange_error, Qdomain_error, Qsingularity_error; | 83 | Lisp_Object Qrange_error, Qdomain_error, Qsingularity_error; |
| 77 | Lisp_Object Qoverflow_error, Qunderflow_error; | 84 | Lisp_Object Qoverflow_error, Qunderflow_error; |
| @@ -83,7 +90,7 @@ Lisp_Object Qinteger; | |||
| 83 | static Lisp_Object Qsymbol, Qstring, Qcons, Qmarker, Qoverlay; | 90 | static Lisp_Object Qsymbol, Qstring, Qcons, Qmarker, Qoverlay; |
| 84 | Lisp_Object Qwindow; | 91 | Lisp_Object Qwindow; |
| 85 | static Lisp_Object Qfloat, Qwindow_configuration; | 92 | static Lisp_Object Qfloat, Qwindow_configuration; |
| 86 | Lisp_Object Qprocess; | 93 | static Lisp_Object Qprocess; |
| 87 | static Lisp_Object Qcompiled_function, Qbuffer, Qframe, Qvector; | 94 | static Lisp_Object Qcompiled_function, Qbuffer, Qframe, Qvector; |
| 88 | static Lisp_Object Qchar_table, Qbool_vector, Qhash_table; | 95 | static Lisp_Object Qchar_table, Qbool_vector, Qhash_table; |
| 89 | static Lisp_Object Qsubrp, Qmany, Qunevalled; | 96 | static Lisp_Object Qsubrp, Qmany, Qunevalled; |