[Emacs-diffs] /srv/bzr/emacs/trunk r111519: Fix compilation with GC_MARK_STACK == GC_USE_GCPROS_AS_BEFORE.

[Dmitry Antipov]

------------------------------------------------------------
revno: 111519
committer: Dmitry Antipov <address@hidden>
branch nick: trunk
timestamp: Mon 2013-01-14 15:07:50 +0400
message:
  Fix compilation with GC_MARK_STACK == GC_USE_GCPROS_AS_BEFORE.
  * eval.c (eval_sub): Protect `form' from being GCed before its
  car and cdr becomes protected with the backtrace entry.
modified:
  src/ChangeLog
  src/eval.c

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2013-01-14 09:55:21 +0000
+++ b/src/ChangeLog     2013-01-14 11:07:50 +0000
@@ -1,5 +1,11 @@
 2013-01-14  Dmitry Antipov  <address@hidden>
 
+       Fix compilation with GC_MARK_STACK == GC_USE_GCPROS_AS_BEFORE.
+       * eval.c (eval_sub): Protect `form' from being GCed before its
+       car and cdr becomes protected with the backtrace entry.
+
+2013-01-14  Dmitry Antipov  <address@hidden>
+
        Make Lisp_Save_Value more versatile storage for up to four objects.
        * lisp.h (toplevel): Enumeration to describe types of saved objects.
        (struct Lisp_Save_Value): New layout.  Adjust comments.

=== modified file 'src/eval.c'
--- a/src/eval.c        2013-01-13 20:03:01 +0000
+++ b/src/eval.c        2013-01-14 11:07:50 +0000
@@ -1931,7 +1931,10 @@
     return form;
 
   QUIT;
+
+  GCPRO1 (form);
   maybe_gc ();
+  UNGCPRO;
 
   if (++lisp_eval_depth > max_lisp_eval_depth)
     {