TABLE OF CONTENTS

ABINIT/m_hastable [ Modules ]

[ Top ] [ Modules ]

NAME

 m_hashtable

FUNCTION

 This module provide a string: value pair hash table

COPYRIGHT

 Taken from http://fortranwiki.org/fortran/show/hash+table+example
 The code is originally written by Izaak Beekman under the LGPL license.
 Adapted for usage in Abinit by hexu

 Note: the behavior is different from the origial version
 The value will be overwritten in this version, whereas it is ignored in the
 original version if the key is already in the table (why??!!).

 Note2:!!!!!!!!!!!!!!!!! FIXME
 It does not handle white space at the end of string correctly. It does not affect
 the usage in Multibinit but BE CAREFUL.

 Below is the original Copyright.
 Copyright (C) Izaak Beekman 2010
 This program is free software: you can redistribute it and/or modify
 it under the terms of the GNU Lesser General Public License as published by
 the Free Software Foundation, either version 3 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 Lesser General Public License for more details.
 You should have received a copy of the GNU Lesser General Public License
 along with this program.  If not, see <http://www.gnu.org/licenses/>.

SOURCE

37 #if defined HAVE_CONFIG_H
38 #include "config.h"
39 #endif
40 
41 #include "abi_common.h"
42 
43 MODULE m_hashtable_strval