[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.0-38-g6800f8
From: |
Andy Wingo |
Subject: |
[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.0-38-g6800f86 |
Date: |
Fri, 25 Feb 2011 12:26:32 +0000 |
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".
http://git.savannah.gnu.org/cgit/guile.git/commit/?id=6800f86d63c4953fe705f6f74e252fb2bd9cc8c8
The branch, stable-2.0 has been updated
via 6800f86d63c4953fe705f6f74e252fb2bd9cc8c8 (commit)
from 080a9d4f564c1b4e2171aa35a2a50fe20c300ecd (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 6800f86d63c4953fe705f6f74e252fb2bd9cc8c8
Author: Andy Wingo <address@hidden>
Date: Fri Feb 25 10:48:35 2011 +0100
make-weak-key-hash-table vacuuming
* libguile/hashtab.c (scm_make_weak_key_hash_table): Whoops, fix the
case I actually cared about.
-----------------------------------------------------------------------
Summary of changes:
libguile/hashtab.c | 12 +++++++++---
1 files changed, 9 insertions(+), 3 deletions(-)
diff --git a/libguile/hashtab.c b/libguile/hashtab.c
index 4c4c106..a76c038 100644
--- a/libguile/hashtab.c
+++ b/libguile/hashtab.c
@@ -456,11 +456,17 @@ SCM_DEFINE (scm_make_weak_key_hash_table,
"make-weak-key-hash-table", 0, 1, 0,
"would modify regular hash tables. (@pxref{Hash Tables})")
#define FUNC_NAME s_scm_make_weak_key_hash_table
{
+ SCM ret;
+
if (SCM_UNBNDP (n))
- return make_hash_table (SCM_HASHTABLEF_WEAK_CAR, 0, FUNC_NAME);
+ ret = make_hash_table (SCM_HASHTABLEF_WEAK_CAR, 0, FUNC_NAME);
else
- return make_hash_table (SCM_HASHTABLEF_WEAK_CAR,
- scm_to_ulong (n), FUNC_NAME);
+ ret = make_hash_table (SCM_HASHTABLEF_WEAK_CAR,
+ scm_to_ulong (n), FUNC_NAME);
+
+ scm_c_register_weak_gc_callback (ret, vacuum_weak_hash_table);
+
+ return ret;
}
#undef FUNC_NAME
hooks/post-receive
--
GNU Guile
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.0-38-g6800f86,
Andy Wingo <=