summaryrefslogtreecommitdiff
path: root/libguile/error.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-07-13 15:00:58 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-07-13 15:00:58 +0000
commit406c7d902207af0e25afc6d543e94067bc92bf2b (patch)
treed432dcda1aff044e335d6fe823625423c84ef520 /libguile/error.c
parent2238100586a99880885ac31c146a2397f2d579ff (diff)
downloadguile-406c7d902207af0e25afc6d543e94067bc92bf2b.tar.gz
* Extend checks performed with SCM_DEBUG_CELL_ACCESSES=1 and make them
configurable at run-time. * Replace SCM_FREEP by SCM_FREE_CELL_P and scm_gc_heap_lock by scm_gc_running_p (not in all places yet).
Diffstat (limited to 'libguile/error.c')
-rw-r--r--libguile/error.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/error.c b/libguile/error.c
index 850bf5b7d..fa409bcef 100644
--- a/libguile/error.c
+++ b/libguile/error.c
@@ -74,7 +74,7 @@ void
scm_error (SCM key, const char *subr, const char *message, SCM args, SCM rest)
{
SCM arg_list;
- if (scm_gc_heap_lock)
+ if (scm_gc_running_p)
{
/* The error occured during GC --- abort */
fprintf (stderr, "Error in %s during GC: %s\n",