1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-12 06:41:13 +02:00

Fix --without-threads against threaded BDW-GC

* libguile/gc.c (scm_storage_prehistory): Prevent BDW-GC from spawning
  marker threads if Guile was built without threading support.
This commit is contained in:
Andy Wingo 2016-07-24 15:29:48 +02:00
parent ca2d00ad65
commit 401214313b

View file

@ -1,5 +1,5 @@
/* Copyright (C) 1995,1996,1997,1998,1999,2000,2001, 2002, 2003, 2006,
* 2008, 2009, 2010, 2011, 2012, 2013, 2014 Free Software Foundation, Inc.
* 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2016 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
@ -608,6 +608,12 @@ scm_storage_prehistory ()
setenv ("GC_MARKERS", "1", 1);
#endif
#if SCM_I_GSC_USE_NULL_THREADS
/* If we have disabled threads in Guile, ensure that the GC doesn't
spawn any marker threads. */
setenv ("GC_MARKERS", "1", 1);
#endif
GC_INIT ();
GC_expand_hp (DEFAULT_INITIAL_HEAP_SIZE);