emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r106311: * alloc.c (DEADP): New macro


From: Paul Eggert
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r106311: * alloc.c (DEADP): New macro, for porting to GNU/Hurd (Bug#9926).
Date: Sun, 06 Nov 2011 21:37:49 -0800
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 106311
fixes bug(s): http://debbugs.gnu.org/9926
committer: Paul Eggert <address@hidden>
branch nick: trunk
timestamp: Sun 2011-11-06 21:37:49 -0800
message:
  * alloc.c (DEADP): New macro, for porting to GNU/Hurd (Bug#9926).
  
  This is also needed for porting to any host where GC_MARK_STACK is
  not GC_MAKE_GCPROS_NOOPS.
  (which_symbols): Use it.
modified:
  src/ChangeLog
  src/alloc.c
=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2011-11-07 02:00:43 +0000
+++ b/src/ChangeLog     2011-11-07 05:37:49 +0000
@@ -1,3 +1,10 @@
+2011-11-07  Paul Eggert  <address@hidden>
+
+       * alloc.c (DEADP): New macro, for porting to GNU/Hurd (Bug#9926).
+       This is also needed for porting to any host where GC_MARK_STACK is
+       not GC_MAKE_GCPROS_NOOPS.
+       (which_symbols): Use it.
+
 2011-11-07  Kenichi Handa  <address@hidden>
 
        * coding.c (coding_set_destination): Check coding->src_pos only

=== modified file 'src/alloc.c'
--- a/src/alloc.c       2011-10-29 17:25:44 +0000
+++ b/src/alloc.c       2011-11-07 05:37:49 +0000
@@ -315,6 +315,7 @@
    on free lists recognizable in O(1).  */
 
 static Lisp_Object Vdead;
+#define DEADP(x) EQ (x, Vdead)
 
 #ifdef GC_MALLOC_CHECK
 
@@ -411,6 +412,10 @@
 
 #endif /* GC_MARK_STACK || GC_MALLOC_CHECK */
 
+#ifndef DEADP
+# define DEADP(x) 0
+#endif
+
 /* Recording what needs to be marked for gc.  */
 
 struct gcpro *gcprolist;
@@ -6261,7 +6266,7 @@
    int gc_count = inhibit_garbage_collection ();
    Lisp_Object found = Qnil;
 
-   if (!EQ (obj, Vdead))
+   if (! DEADP (obj))
      {
        for (sblk = symbol_block; sblk; sblk = sblk->next)
         {


reply via email to

[Prev in Thread] Current Thread [Next in Thread]