diff options
Diffstat (limited to 'test/spass/hash.h')
-rw-r--r-- | test/spass/hash.h | 107 |
1 files changed, 107 insertions, 0 deletions
diff --git a/test/spass/hash.h b/test/spass/hash.h new file mode 100644 index 00000000..3556e5dc --- /dev/null +++ b/test/spass/hash.h @@ -0,0 +1,107 @@ +/**************************************************************/ +/* ********************************************************** */ +/* * * */ +/* * SIMPLE HASHING * */ +/* * * */ +/* * $Module: HASH * */ +/* * * */ +/* * Copyright (C) 1996, 1999, 2000, 2001 * */ +/* * MPI fuer Informatik * */ +/* * * */ +/* * This program is free software; you can redistribute * */ +/* * it and/or modify it under the terms of the GNU * */ +/* * General Public License as published by the Free * */ +/* * Software Foundation; either version 2 of the License, * */ +/* * or (at your option) any later version. * */ +/* * * */ +/* * This program is distributed in the hope that it will * */ +/* * be useful, but WITHOUT ANY WARRANTY; without even * */ +/* * the implied warranty of MERCHANTABILITY or FITNESS * */ +/* * FOR A PARTICULAR PURPOSE. See the GNU General Public * */ +/* * License for more details. * */ +/* * * */ +/* * You should have received a copy of the GNU General * */ +/* * Public License along with this program; if not, write * */ +/* * to the Free Software Foundation, Inc., 59 Temple * */ +/* * Place, Suite 330, Boston, MA 02111-1307 USA * */ +/* * * */ +/* * * */ +/* $Revision: 21527 $ * */ +/* $State$ * */ +/* $Date: 2005-04-24 21:10:28 -0700 (Sun, 24 Apr 2005) $ * */ +/* $Author: duraid $ * */ +/* * * */ +/* * Contact: * */ +/* * Christoph Weidenbach * */ +/* * MPI fuer Informatik * */ +/* * Stuhlsatzenhausweg 85 * */ +/* * 66123 Saarbruecken * */ +/* * Email: weidenb@mpi-sb.mpg.de * */ +/* * Germany * */ +/* * * */ +/* ********************************************************** */ +/**************************************************************/ + + +/* $RCSfile$ */ + +#ifndef _HASH_ +#define _HASH_ + +/**************************************************************/ +/* Includes */ +/**************************************************************/ + +#include "list.h" + + +/**************************************************************/ +/* Structures */ +/**************************************************************/ + +#define hash__SIZE 29 /* a prime */ + +/* Each Entry is a list of pairs <key,value> */ +extern LIST hash_TABLE[hash__SIZE]; + + +/**************************************************************/ +/* Inline Functions */ +/**************************************************************/ + +static __inline__ NAT hash_Index(POINTER Key) +{ + return (NAT)Key % hash__SIZE; +} + +static __inline__ LIST hash_List(NAT Index) +{ + return hash_TABLE[Index]; +} + +static __inline__ void hash_PutList(NAT Index, LIST List) +{ + hash_TABLE[Index] = List; +} + +static __inline__ void hash_Put(POINTER Key, POINTER Value) +{ + hash_PutList(hash_Index(Key), list_Cons(list_PairCreate((POINTER)Key, Value), + hash_List(hash_Index(Key)))); +} + + +/**************************************************************/ +/* Functions */ +/**************************************************************/ + +void hash_Init(void); +void hash_Reset(void); +void hash_ResetWithValue(void (*)(POINTER)); + +POINTER hash_Get(POINTER); + + +#endif + + |