From 9358af6a3e923679c2dbb99ac058e6cb0a90fe92 Mon Sep 17 00:00:00 2001
From: Mikael Djurfeldt <djurfeldt@nada.kth.se>
Date: Wed, 19 Feb 2003 17:57:01 +0000
Subject: [PATCH] Fix of previous change

---
 libguile/hashtab.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/libguile/hashtab.c b/libguile/hashtab.c
index c7833db8a..1ea567741 100644
--- a/libguile/hashtab.c
+++ b/libguile/hashtab.c
@@ -104,6 +104,7 @@ SCM weak_hashtables = SCM_EOL;
 static SCM
 make_hash_table (int flags, unsigned long k, const char *func_name) {
   SCM table, vector;
+  scm_t_hashtable *t;
   int i = 0, n = k ? k : 31;
   while (i < HASHTABLE_SIZE_N && n > hashtable_size[i])
     ++i;
@@ -118,7 +119,7 @@ make_hash_table (int flags, unsigned long k, const char *func_name) {
 					 func_name);
   else
     vector = scm_c_make_vector (n, SCM_EOL);
-  scm_t_hashtable *t = scm_gc_malloc (sizeof (*t), s_hashtable);
+  t = scm_gc_malloc (sizeof (*t), s_hashtable);
   t->min_size_index = t->size_index = i;
   t->n_items = 0;
   t->lower = 0;
-- 
2.20.1