summaryrefslogtreecommitdiff
path: root/libguile/debug-malloc.c
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>2000-04-21 15:57:22 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>2000-04-21 15:57:22 +0000
commit0e850825e7ae624127aa78fad8bc88410c279bf6 (patch)
tree1ea1af71897c15330b841f3ada136ab5f11b6124 /libguile/debug-malloc.c
parenta0599745350ad81ec4133991049cb0dba3a9c2cd (diff)
downloadguile-0e850825e7ae624127aa78fad8bc88410c279bf6.tar.gz
Fixes
Diffstat (limited to 'libguile/debug-malloc.c')
-rw-r--r--libguile/debug-malloc.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile/debug-malloc.c b/libguile/debug-malloc.c
index 608cc2a02..53225ff39 100644
--- a/libguile/debug-malloc.c
+++ b/libguile/debug-malloc.c
@@ -49,7 +49,7 @@
#include "libguile/alist.h"
#include "libguile/strings.h"
-#include "debug-malloc.h"
+#include "libguile/debug-malloc.h"
/*
* The following code is a hack written quickly in order to solve a
@@ -71,7 +71,7 @@ typedef struct hash_entry {
static int malloc_type_size = 31;
static hash_entry_t *malloc_type = 0;
-static int malloc_object_size = 9973;
+static int malloc_object_size = 8191;
static hash_entry_t *malloc_object = 0;
#define TABLE(table) malloc_ ## table
@@ -135,7 +135,7 @@ grow (hash_entry_t **table, int *size)
hash_entry_t *TABLE (new) = 0;
int SIZE (new);
int i, j;
- SIZE (new) = 2 * (oldsize - N_SEEK);
+ SIZE (new) = 2 * (oldsize - N_SEEK + 1) - 1;
again:
TABLE (new) = realloc (TABLE (new),
sizeof (hash_entry_t) * (SIZE (new) + N_SEEK));
@@ -263,5 +263,5 @@ scm_debug_malloc_prehistory ()
void
scm_init_debug_malloc ()
{
-#include "debug-malloc.x"
+#include "libguile/debug-malloc.x"
}