static void
module_assert_thread (void)
{
- if (! module_assertions || (in_current_thread () && ! gc_in_progress))
+ if (!module_assertions)
return;
- module_abort (gc_in_progress ?
- "Module function called during garbage collection" :
- "Module function called from outside the current Lisp thread");
+ if (!in_current_thread ())
+ module_abort ("Module function called from outside "
+ "the current Lisp thread");
+ if (gc_in_progress)
+ module_abort ("Module function called during garbage collection");
}
static void