summaryrefslogtreecommitdiff
path: root/libguile/gc-malloc.c
diff options
context:
space:
mode:
authorHan-Wen Nienhuys <hanwen@lilypond.org>2002-08-08 23:18:23 +0000
committerHan-Wen Nienhuys <hanwen@lilypond.org>2002-08-08 23:18:23 +0000
commitbe3ff02158f2bee16b1cf8a8419ba80613172ee1 (patch)
treeec47395ef502f86f2a96c585eff4eb7277044339 /libguile/gc-malloc.c
parentda220f2794a54186721c6ef6ae6a45ba0c3b55a7 (diff)
downloadguile-be3ff02158f2bee16b1cf8a8419ba80613172ee1.tar.gz
* gc-card.c ("sweep_card"): remove SCM_MISC_ERROR messages: print
message and abort. * gc-mark.c ("scm_gc_mark_dependencies"): idem.
Diffstat (limited to 'libguile/gc-malloc.c')
-rw-r--r--libguile/gc-malloc.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/libguile/gc-malloc.c b/libguile/gc-malloc.c
index 86f2b50c1..0cd6bfaad 100644
--- a/libguile/gc-malloc.c
+++ b/libguile/gc-malloc.c
@@ -380,7 +380,10 @@ scm_must_free (void *obj)
if (obj)
free (obj);
else
- SCM_MISC_ERROR ("freeing NULL pointer", SCM_EOL);
+ {
+ fprintf (stderr,"freeing NULL pointer");
+ abort ();
+ }
}
#undef FUNC_NAME