diff options
| author | Stefan Monnier | 2012-09-28 22:02:34 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2012-09-28 22:02:34 -0400 |
| commit | e7c1b6ef850e7b4d021fabf4a922010781ed05bd (patch) | |
| tree | e7dec53a158a9a5acf94f55597f31814c3138ede /src/profiler.c | |
| parent | 277f0cfa8b7dde109913f52c40eb8447b71eaffc (diff) | |
| download | emacs-e7c1b6ef850e7b4d021fabf4a922010781ed05bd.tar.gz emacs-e7c1b6ef850e7b4d021fabf4a922010781ed05bd.zip | |
* src/lisp.h (struct backtrace): Remove indirection for `function' field.
* src/xdisp.c (redisplay_internal):
* src/profiler.c (record_backtrace, sigprof_handler_1):
* src/alloc.c (Fgarbage_collect):
* src/eval.c (interactive_p, Fsignal, eval_sub, Ffuncall, Fbacktrace)
(Fbacktrace_frame): Adjust accordingly.
Diffstat (limited to 'src/profiler.c')
| -rw-r--r-- | src/profiler.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/profiler.c b/src/profiler.c index 4d748b547f5..44a12fc159c 100644 --- a/src/profiler.c +++ b/src/profiler.c | |||
| @@ -149,7 +149,7 @@ record_backtrace (log_t *log, size_t count) | |||
| 149 | /* Copy the backtrace contents into working memory. */ | 149 | /* Copy the backtrace contents into working memory. */ |
| 150 | for (; i < asize && backlist; i++, backlist = backlist->next) | 150 | for (; i < asize && backlist; i++, backlist = backlist->next) |
| 151 | /* FIXME: For closures we should ignore the environment. */ | 151 | /* FIXME: For closures we should ignore the environment. */ |
| 152 | ASET (backtrace, i, *backlist->function); | 152 | ASET (backtrace, i, backlist->function); |
| 153 | 153 | ||
| 154 | /* Make sure that unused space of working memory is filled with nil. */ | 154 | /* Make sure that unused space of working memory is filled with nil. */ |
| 155 | for (; i < asize; i++) | 155 | for (; i < asize; i++) |
| @@ -218,7 +218,7 @@ static void | |||
| 218 | sigprof_handler_1 (int signal) | 218 | sigprof_handler_1 (int signal) |
| 219 | { | 219 | { |
| 220 | eassert (HASH_TABLE_P (cpu_log)); | 220 | eassert (HASH_TABLE_P (cpu_log)); |
| 221 | if (backtrace_list && EQ (*backtrace_list->function, Qautomatic_gc)) | 221 | if (backtrace_list && EQ (backtrace_list->function, Qautomatic_gc)) |
| 222 | /* Special case the time-count inside GC because the hash-table | 222 | /* Special case the time-count inside GC because the hash-table |
| 223 | code is not prepared to be used while the GC is running. | 223 | code is not prepared to be used while the GC is running. |
| 224 | More specifically it uses ASIZE at many places where it does | 224 | More specifically it uses ASIZE at many places where it does |