diff options
| author | Paul Eggert | 2011-04-13 15:53:58 -0700 |
|---|---|---|
| committer | Paul Eggert | 2011-04-13 15:53:58 -0700 |
| commit | 57a96f5c91758efc0acf2c343dc876d0e0926018 (patch) | |
| tree | 619475e80ea847f4045da7c153d1eafa6e7296e8 /src | |
| parent | 35f08c383e85c6de5a87fc3e16993354b9987ae9 (diff) | |
| download | emacs-57a96f5c91758efc0acf2c343dc876d0e0926018.tar.gz emacs-57a96f5c91758efc0acf2c343dc876d0e0926018.zip | |
* eval.c: Make symbols static if they're not exported.
(backtrace_list, lisp_eval_depth, when_entered_debugger): Now static.
* lisp.h (backtrace_list): Remove decl.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/eval.c | 6 | ||||
| -rw-r--r-- | src/lisp.h | 2 |
3 files changed, 7 insertions, 5 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index fe3fd550544..5a6da2ab788 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,5 +1,9 @@ | |||
| 1 | 2011-04-13 Paul Eggert <eggert@cs.ucla.edu> | 1 | 2011-04-13 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 2 | ||
| 3 | * eval.c: Make symbols static if they're not exported. | ||
| 4 | (backtrace_list, lisp_eval_depth, when_entered_debugger): Now static. | ||
| 5 | * lisp.h (backtrace_list): Remove decl. | ||
| 6 | |||
| 3 | * emacs.c: Make symbols static if they're not exported. | 7 | * emacs.c: Make symbols static if they're not exported. |
| 4 | (malloc_state_ptr, malloc_using_checking, syms_of_emacs): | 8 | (malloc_state_ptr, malloc_using_checking, syms_of_emacs): |
| 5 | (fatal_error_code, fatal_error_signal_hook, standard_args): | 9 | (fatal_error_code, fatal_error_signal_hook, standard_args): |
diff --git a/src/eval.c b/src/eval.c index dddedc77286..ef5eb6bdaaf 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -56,7 +56,7 @@ struct backtrace | |||
| 56 | char debug_on_exit : 1; | 56 | char debug_on_exit : 1; |
| 57 | }; | 57 | }; |
| 58 | 58 | ||
| 59 | struct backtrace *backtrace_list; | 59 | static struct backtrace *backtrace_list; |
| 60 | 60 | ||
| 61 | #if !BYTE_MARK_STACK | 61 | #if !BYTE_MARK_STACK |
| 62 | static | 62 | static |
| @@ -116,7 +116,7 @@ struct specbinding *specpdl_ptr; | |||
| 116 | 116 | ||
| 117 | /* Depth in Lisp evaluations and function calls. */ | 117 | /* Depth in Lisp evaluations and function calls. */ |
| 118 | 118 | ||
| 119 | EMACS_INT lisp_eval_depth; | 119 | static EMACS_INT lisp_eval_depth; |
| 120 | 120 | ||
| 121 | /* The value of num_nonmacro_input_events as of the last time we | 121 | /* The value of num_nonmacro_input_events as of the last time we |
| 122 | started to enter the debugger. If we decide to enter the debugger | 122 | started to enter the debugger. If we decide to enter the debugger |
| @@ -125,7 +125,7 @@ EMACS_INT lisp_eval_depth; | |||
| 125 | signal the error instead of entering an infinite loop of debugger | 125 | signal the error instead of entering an infinite loop of debugger |
| 126 | invocations. */ | 126 | invocations. */ |
| 127 | 127 | ||
| 128 | int when_entered_debugger; | 128 | static int when_entered_debugger; |
| 129 | 129 | ||
| 130 | /* The function from which the last `signal' was called. Set in | 130 | /* The function from which the last `signal' was called. Set in |
| 131 | Fsignal. */ | 131 | Fsignal. */ |
diff --git a/src/lisp.h b/src/lisp.h index f678630a76f..420d6024b7f 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -2005,8 +2005,6 @@ struct catchtag | |||
| 2005 | struct byte_stack *byte_stack; | 2005 | struct byte_stack *byte_stack; |
| 2006 | }; | 2006 | }; |
| 2007 | 2007 | ||
| 2008 | extern struct backtrace *backtrace_list; | ||
| 2009 | |||
| 2010 | extern Lisp_Object memory_signal_data; | 2008 | extern Lisp_Object memory_signal_data; |
| 2011 | 2009 | ||
| 2012 | /* An address near the bottom of the stack. | 2010 | /* An address near the bottom of the stack. |