Branch: Tag:

2000-04-25

2000-04-25 22:35:20 by Martin Stjernholm <mast@lysator.liu.se>

Fixed debug check for thread switching inside the gc.

Rev: src/threads.h:1.90

1:   /* -  * $Id: threads.h,v 1.89 2000/04/23 03:01:26 mast Exp $ +  * $Id: threads.h,v 1.90 2000/04/25 22:35:20 mast Exp $    */   #ifndef THREADS_H   #define THREADS_H
504:    extern int Pike_in_gc; \    if(thread_for_id(th_self()) != thread_id) \    fatal("thread_for_id() (or thread_id) failed! %p != %p\n",thread_for_id(th_self()),thread_id); \ -  if (Pike_in_gc >= 100 && Pike_in_gc != 300 && Pike_in_gc != 500) \ +  if (Pike_in_gc > 50 && Pike_in_gc <= 200) \    fatal("Threads allowed during garbage collection.\n"); \    }) \    if(num_threads > 1 && !threads_disabled) { \
540:    extern int Pike_in_gc; \    if(thread_for_id(th_self()) != thread_id) \    fatal("thread_for_id() (or thread_id) failed! %p != %p\n",thread_for_id(th_self()),thread_id); \ -  if (Pike_in_gc >= 100 && Pike_in_gc != 300 && Pike_in_gc != 500) \ +  if (Pike_in_gc > 50 && Pike_in_gc <= 200) \    fatal("Threads allowed during garbage collection.\n"); \    }) \    if(num_threads > 1 && !threads_disabled) { \