+// ============================================================================
+// implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// wxHashTablleBase for working with "void *" data
+// ----------------------------------------------------------------------------
+
+wxHashTableBase::wxHashTableBase()
+{
+ m_deleteContents = FALSE;
+ m_hashTable = (wxListBase **)NULL;
+ m_hashSize = 0;
+ m_count = 0;
+ m_keyType = wxKEY_NONE;
+}
+
+void wxHashTableBase::Create(wxKeyType keyType, size_t size)
+{
+ Destroy();
+
+ m_hashSize = size;
+ m_keyType = keyType;
+ m_hashTable = new wxListBase *[size];
+ for ( size_t n = 0; n < m_hashSize; n++ )
+ {
+ m_hashTable[n] = (wxListBase *) NULL;
+ }
+}
+
+void wxHashTableBase::Destroy()
+{
+ if ( m_hashTable )
+ {
+ for ( size_t n = 0; n < m_hashSize; n++ )
+ {
+ delete m_hashTable[n];
+ }
+
+ delete [] m_hashTable;
+
+ m_hashTable = (wxListBase **)NULL;
+
+ m_count = 0;
+ }
+}
+
+void wxHashTableBase::DeleteContents(bool flag)
+{
+ m_deleteContents = flag;
+ for ( size_t n = 0; n < m_hashSize; n++ )
+ {
+ if ( m_hashTable[n] )
+ {
+ m_hashTable[n]->DeleteContents(flag);
+ }
+ }
+}
+
+wxNodeBase *wxHashTableBase::GetNode(long key, long value) const
+{
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
+
+ wxNodeBase *node;
+ if ( m_hashTable[slot] )
+ {
+ node = m_hashTable[slot]->Find(wxListKey(value));
+ }
+ else
+ {
+ node = (wxNodeBase *)NULL;
+ }
+
+ return node;
+}
+
+// ----------------------------------------------------------------------------
+// wxHashTableLong
+// ----------------------------------------------------------------------------
+
+wxHashTableLong::~wxHashTableLong()
+{
+ Destroy();
+}
+
+void wxHashTableLong::Init(size_t size)
+{
+ m_hashSize = size;
+ m_values = new wxArrayLong *[size];
+ m_keys = new wxArrayLong *[size];
+
+ for ( size_t n = 0; n < m_hashSize; n++ )
+ {
+ m_values[n] =
+ m_keys[n] = (wxArrayLong *)NULL;
+ }
+
+ m_count = 0;
+}
+
+void wxHashTableLong::Create(size_t size)
+{
+ Init(size);
+}
+
+void wxHashTableLong::Destroy()
+{
+ for ( size_t n = 0; n < m_hashSize; n++ )
+ {
+ delete m_values[n];
+ delete m_keys[n];
+ }
+
+ delete [] m_values;
+ delete [] m_keys;
+ m_hashSize = 0;
+ m_count = 0;
+}
+
+void wxHashTableLong::Put(long key, long value)
+{
+ wxCHECK_RET( m_hashSize, _T("must call Create() first") );
+
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
+
+ if ( !m_keys[slot] )
+ {
+ m_keys[slot] = new wxArrayLong;
+ m_values[slot] = new wxArrayLong;
+ }
+
+ m_keys[slot]->Add(key);
+ m_values[slot]->Add(value);
+
+ m_count++;
+}
+
+long wxHashTableLong::Get(long key) const
+{
+ wxCHECK_MSG( m_hashSize, wxNOT_FOUND, _T("must call Create() first") );
+
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
+
+ wxArrayLong *keys = m_keys[slot];
+ if ( keys )
+ {
+ size_t count = keys->GetCount();
+ for ( size_t n = 0; n < count; n++ )
+ {
+ if ( keys->Item(n) == key )
+ {
+ return m_values[slot]->Item(n);
+ }
+ }
+ }
+
+ return wxNOT_FOUND;
+}
+
+long wxHashTableLong::Delete(long key)
+{
+ wxCHECK_MSG( m_hashSize, wxNOT_FOUND, _T("must call Create() first") );
+
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
+
+ wxArrayLong *keys = m_keys[slot];
+ if ( keys )
+ {
+ size_t count = keys->GetCount();
+ for ( size_t n = 0; n < count; n++ )
+ {
+ if ( keys->Item(n) == key )
+ {
+ long val = m_values[slot]->Item(n);
+
+ keys->RemoveAt(n);
+ m_values[slot]->RemoveAt(n);
+
+ m_count--;
+
+ return val;
+ }
+ }
+ }
+
+ return wxNOT_FOUND;
+}
+
+// ----------------------------------------------------------------------------
+// wxStringHashTable: more efficient than storing strings in a list
+// ----------------------------------------------------------------------------
+
+wxStringHashTable::wxStringHashTable(size_t sizeTable)