TABLE OF CONTENTS
ABINIT/m_hastable [ 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