diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2013-02-14 08:46:55 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2013-02-14 10:56:58 +0000 |
| commit | 7e7a4e4d7e9e84b2c57d3d55e372e738b5f8dbf5 (patch) | |
| tree | b5ab2b56418c09f01275970cc7d4e6629b0e7b43 /rts/Hash.c | |
| parent | 65a0e1eb88fb48d085f8da498a7acc2fd345c2a8 (diff) | |
| download | haskell-7e7a4e4d7e9e84b2c57d3d55e372e738b5f8dbf5.tar.gz | |
Separate StablePtr and StableName tables (#7674)
To improve performance of StablePtr.
Diffstat (limited to 'rts/Hash.c')
| -rw-r--r-- | rts/Hash.c | 5 |
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; +} |