summaryrefslogtreecommitdiff
path: root/libguile/hashtab.c
diff options
context:
space:
mode:
authorKevin Ryde <user42@zip.com.au>2005-04-22 23:33:15 +0000
committerKevin Ryde <user42@zip.com.au>2005-04-22 23:33:15 +0000
commit4cff503fc8225c7f5784fb9d67f9eecdc95ad7cf (patch)
treeab120bbb9fadae867433fef81553eaa93b5b19e1 /libguile/hashtab.c
parentb906b056e46e622d52c99c341aba252797970e87 (diff)
downloadguile-4cff503fc8225c7f5784fb9d67f9eecdc95ad7cf.tar.gz
(scm_hashx_remove_x): Need to pass "closure" to scm_hash_fn_remove_x.
Diffstat (limited to 'libguile/hashtab.c')
-rw-r--r--libguile/hashtab.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/hashtab.c b/libguile/hashtab.c
index 488054969..8e1cb63df 100644
--- a/libguile/hashtab.c
+++ b/libguile/hashtab.c
@@ -933,7 +933,8 @@ SCM_DEFINE (scm_hashx_remove_x, "hashx-remove!", 4, 0, 0,
scm_t_ihashx_closure closure;
closure.hash = hash;
closure.assoc = assoc;
- return scm_hash_fn_remove_x (table, obj, scm_ihashx, scm_sloppy_assx, 0);
+ return scm_hash_fn_remove_x (table, obj, scm_ihashx, scm_sloppy_assx,
+ (void *) &closure);
}
#undef FUNC_NAME