diff options
| author | Paul Eggert | 2019-03-01 09:01:59 -0800 |
|---|---|---|
| committer | Paul Eggert | 2019-03-01 09:09:47 -0800 |
| commit | 7e29eae023c8158d41eba02c2367e70cbee53642 (patch) | |
| tree | 6679f45eba3b0b06dfb8ba4353b259445b6c1340 /lib-src | |
| parent | fb52d961a40d889d87628058be6ea8116ced2e13 (diff) | |
| download | emacs-7e29eae023c8158d41eba02c2367e70cbee53642.tar.gz emacs-7e29eae023c8158d41eba02c2367e70cbee53642.zip | |
Suppress GC stats when obviously not needed
This should help future improvements where these stats can be
bignums that do not fit into intmax_t.
* src/alloc.c (struct gcstat, gcstat): New type and static var,
to package up GC statistics into one C object. It replaces ...
(total_free_intervals, total_intervals, total_strings)
(total_free_strings, total_string_bytes, total_vectors)
(total_vector_slots, total_free_vector_slots): ... these
removed static vars. All uses changed.
(garbage_collect_1): Accept a struct gcstat *, not a void *
which was not used anymore anyway. Return a bool indicating
success, instead of a Lisp object. All callers changed.
(garbage_collect): New function. All C callers of
Fgarbage_collect changed to use it, since none of them use the
return value. Now, only Lisp code uses Fgarbage_collect.
(Fgarbage_collect): No longer noinline. Cons up the return
value here, not in garbage_collect_1.
Diffstat (limited to 'lib-src')
| -rw-r--r-- | lib-src/make-docfile.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c index 05a08473c3f..ccd245e0139 100644 --- a/lib-src/make-docfile.c +++ b/lib-src/make-docfile.c | |||
| @@ -1107,6 +1107,9 @@ scan_c_stream (FILE *infile) | |||
| 1107 | g->flags |= DEFUN_noreturn; | 1107 | g->flags |= DEFUN_noreturn; |
| 1108 | if (strstr (input_buffer, "const")) | 1108 | if (strstr (input_buffer, "const")) |
| 1109 | g->flags |= DEFUN_const; | 1109 | g->flags |= DEFUN_const; |
| 1110 | |||
| 1111 | /* Although the noinline attribute is no longer used, | ||
| 1112 | leave its support in, in case it's needed later. */ | ||
| 1110 | if (strstr (input_buffer, "noinline")) | 1113 | if (strstr (input_buffer, "noinline")) |
| 1111 | g->flags |= DEFUN_noinline; | 1114 | g->flags |= DEFUN_noinline; |
| 1112 | } | 1115 | } |