1 files changed, 5 insertions, 0 deletions
diff --git a/rts/Hash.c b/rts/Hash.c
index 9c9b2bce42..9ab8ffb53e 100644
--- a/rts/Hash.c
+++ b/rts/Hash.c
@@ -392,3 +392,8 @@ exitHashTable(void)
 {
     /* nothing to do */
 }
+
+int keyCountHashTable (HashTable *table)
+{
+    return table->kcount;
+}