[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/alloc.c
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/src/alloc.c |
Date: |
Sun, 25 May 2003 13:40:04 -0400 |
Index: emacs/src/alloc.c
diff -c emacs/src/alloc.c:1.299 emacs/src/alloc.c:1.300
*** emacs/src/alloc.c:1.299 Sat May 17 08:40:32 2003
--- emacs/src/alloc.c Sun May 25 13:40:03 2003
***************
*** 4087,4093 ****
`gc-cons-threshold' bytes of Lisp data since previous garbage collection. */)
()
{
- register struct gcpro *tail;
register struct specbinding *bind;
struct catchtag *catch;
struct handler *handler;
--- 4087,4092 ----
***************
*** 4201,4215 ****
|| GC_MARK_STACK == GC_MARK_STACK_CHECK_GCPROS)
mark_stack ();
#else
! for (tail = gcprolist; tail; tail = tail->next)
! for (i = 0; i < tail->nvars; i++)
! if (!XMARKBIT (tail->var[i]))
! {
! /* Explicit casting prevents compiler warning about
! discarding the `volatile' qualifier. */
! mark_object ((Lisp_Object *)&tail->var[i]);
! XMARK (tail->var[i]);
! }
#endif
mark_byte_stack ();
--- 4200,4217 ----
|| GC_MARK_STACK == GC_MARK_STACK_CHECK_GCPROS)
mark_stack ();
#else
! {
! register struct gcpro *tail;
! for (tail = gcprolist; tail; tail = tail->next)
! for (i = 0; i < tail->nvars; i++)
! if (!XMARKBIT (tail->var[i]))
! {
! /* Explicit casting prevents compiler warning about
! discarding the `volatile' qualifier. */
! mark_object ((Lisp_Object *)&tail->var[i]);
! XMARK (tail->var[i]);
! }
! }
#endif
mark_byte_stack ();