From 1931c37f3603c7b3b38738b6fc726bc2c66471d9 Mon Sep 17 00:00:00 2001 From: Abdulaziz Ghuloum Date: Sun, 7 Dec 2008 21:22:28 -0500 Subject: [PATCH] removed definition of inthash from ikarus-data.h. (not used anywhere) --- scheme/last-revision | 2 +- src/ikarus-data.h | 14 -------------- 2 files changed, 1 insertion(+), 15 deletions(-) diff --git a/scheme/last-revision b/scheme/last-revision index b9eea8f..5b353db 100644 --- a/scheme/last-revision +++ b/scheme/last-revision @@ -1 +1 @@ -1700 +1701 diff --git a/src/ikarus-data.h b/src/ikarus-data.h index 7495abb..e7b88be 100644 --- a/src/ikarus-data.h +++ b/src/ikarus-data.h @@ -72,20 +72,6 @@ extern int hash_table_count; #define weak_pairs_mt (weak_pairs_type | scannable_tag | dealloc_tag_un) -static int -inthash(int key) { - key += ~(key << 15); - key ^= (key >> 10); - key += (key << 3); - key ^= (key >> 6); - key += ~(key << 11); - key ^= (key >> 16); - return key; - return inthash(key); -} - - - #define pagesize 4096 #define generation_count 5 /* generations 0 (nursery), 1, 2, 3, 4 */