1 files changed, 6 insertions, 1 deletions
diff --git a/hash.h b/hash.h
index 0b293801..e90fccd4 100644
--- a/hash.h
+++ b/hash.h
@@ -29,7 +29,7 @@ extern val weak_keys_k, weak_vals_k, equal_based_k;
 val make_hash(val weak_keys, val weak_vals, val equal_based);
 val make_similar_hash(val existing);
 val copy_hash(val existing);
-val *gethash_l(val hash, val key, val *new_p);
+val gethash_c(val hash, val key, val *new_p);
 val gethash(val hash, val key);
 val inhash(val hash, val key, val init);
 val gethash_n(val hash, val key, val notfound_val);
@@ -61,4 +61,9 @@ val hash_update_1(val hash, val key, val fun, val init);
 
 void hash_process_weak(void);
 
+INLINE val *gethash_l(val hash, val key, val *new_p)
+{
+  return cdr_l(gethash_c(hash, key, new_p));
+}
+
 void hash_init(void);