diff options
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c index c49f8e85c2f..030bf14bcea 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -1931,7 +1931,10 @@ eval_sub (Lisp_Object form) | |||
| 1931 | return form; | 1931 | return form; |
| 1932 | 1932 | ||
| 1933 | QUIT; | 1933 | QUIT; |
| 1934 | |||
| 1935 | GCPRO1 (form); | ||
| 1934 | maybe_gc (); | 1936 | maybe_gc (); |
| 1937 | UNGCPRO; | ||
| 1935 | 1938 | ||
| 1936 | if (++lisp_eval_depth > max_lisp_eval_depth) | 1939 | if (++lisp_eval_depth > max_lisp_eval_depth) |
| 1937 | { | 1940 | { |