[Emacs-diffs] Changes to emacs/gc/alloc.c [Boehm-GC]

[Dave Love]

Index: emacs/gc/alloc.c
diff -c emacs/gc/alloc.c:1.2.2.2 emacs/gc/alloc.c:1.2.2.3
*** emacs/gc/alloc.c:1.2.2.2    Fri Jun  6 05:43:30 2003
--- emacs/gc/alloc.c    Mon Jun 16 11:41:50 2003
***************
*** 72,77 ****
--- 72,84 ----
  GC_bool GC_need_full_gc = FALSE;
                           /* Need full GC do to heap growth.   */
  
+ #ifdef THREADS
+   GC_bool GC_world_stopped = FALSE;
+ # define IF_THREADS(x) x
+ #else
+ # define IF_THREADS(x)
+ #endif
+ 
  word GC_used_heap_size_after_full = 0;
  
  char * GC_copyright[] =
***************
*** 488,493 ****
--- 495,501 ----
          GC_cond_register_dynamic_libraries();
  #   endif
      STOP_WORLD();
+     IF_THREADS(GC_world_stopped = TRUE);
  #   ifdef CONDPRINT
        if (GC_print_stats) {
        GC_printf1("--> Marking for collection %lu ",
***************
*** 518,523 ****
--- 526,532 ----
                      }
  #                 endif
                    GC_deficit = i; /* Give the mutator a chance. */
+                     IF_THREADS(GC_world_stopped = FALSE);
                    START_WORLD();
                    return(FALSE);
            }
***************
*** 551,556 ****
--- 560,566 ----
              (*GC_check_heap)();
          }
      
+     IF_THREADS(GC_world_stopped = FALSE);
      START_WORLD();
  #   ifdef PRINTTIMES
        GET_TIME(current_time);