mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-18 09:40:25 +02:00
Code Activity

Fix --without-threads against threaded BDW-GC

Browse source 
* 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
1 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

8
libguile/gc.c
View file

@ -1,5 +1,5 @@
/* Copyright (C) 1995,1996,1997,1998,1999,2000,2001, 2002, 2003, 2006, /* 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 * This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License * modify it under the terms of the GNU Lesser General Public License
@ -608,6 +608,12 @@ scm_storage_prehistory ()
setenv ("GC_MARKERS", "1", 1); setenv ("GC_MARKERS", "1", 1);
#endif #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_INIT ();
GC_expand_hp (DEFAULT_INITIAL_HEAP_SIZE); GC_expand_hp (DEFAULT_INITIAL_HEAP_SIZE);