From: Han-Wen Nienhuys <hanwen@lilypond.org>
Date: Mon, 18 Aug 2008 14:02:43 +0000 (-0300)
Subject: Fix sizeof() nitpick for goops corruption.
X-Git-Url: http://git.hcoop.net/bpt/guile.git/commitdiff_plain/408bcd99d3ec8eef04a44f24cd97dd32428d00c8

Fix sizeof() nitpick for goops corruption.
---

diff --git a/libguile/goops.c b/libguile/goops.c
index cc610fa9c..8f298c539 100644
--- a/libguile/goops.c
+++ b/libguile/goops.c
@@ -1709,7 +1709,7 @@ go_to_hell (void *o)
   if (n_hell >= hell_size)
     {
       hell_size *= 2;
-      hell = scm_realloc (hell, hell_size * sizeof(scm_t_bits));
+      hell = scm_realloc (hell, hell_size * sizeof(*hell));
     }
   hell[n_hell++] = SCM_STRUCT_DATA (obj);
   scm_unlock_mutex (hell_mutex);