diff --git a/include/assoc.cpp b/include/assoc.cpp
index 95b2c9a20..b6a923fc0 100755
--- a/include/assoc.cpp
+++ b/include/assoc.cpp
@@ -204,7 +204,7 @@ bool TAssoc_array::remove(
 // @rdesc Ritorna l'oggetto cercato. Se l'oggetto non viene trovato 
 //        ritorna un errore
 TObject& TAssoc_array::find(
-  const char* key) // @parm Chiave dell'oggetto da trovare
+  const char* key) const // @parm Chiave dell'oggetto da trovare
 
 
   // @comm Cerca l'oggetto indicizzato con chiave <p key>. Viene controllato se
diff --git a/include/assoc.h b/include/assoc.h
index fbce5f59f..6d5ae951d 100755
--- a/include/assoc.h
+++ b/include/assoc.h
@@ -77,28 +77,26 @@ protected:
   THash_object* _lookup(const char* k, bool& isnew, bool insert = FALSE);  
   // @cmember Copia tutto l'array associativo e ne duplica gli elementi
   TAssoc_array & copy(const TAssoc_array & a);  
-  // @cmember Duplica l'array associativo copiandone gli elementi.
-  virtual TObject* dup () const { return new TAssoc_array(*this);}
 
   // @access Public Member
 public:
+  // @cmember Duplica l'array associativo copiandone gli elementi.
+  virtual TObject* dup () const { return new TAssoc_array(*this);}
 
-  // @cmember Ritorna il numero di elementi presenti
-  int items() const
-  { return _cnt; }
-  
   // @cmember Ritorna un puntatore al primo oggetto
   virtual TObject* first_item( );
   // @cmember Ritorna un puntatore all'ultimo oggetto
   virtual TObject* last_item( );
   // @cmember Ritorna un puntatore all'oggetto successivo al quello corrente
   virtual TObject* succ_item( );
-  // @cmember Ritorna unpuntatore all'oggetto oggetto che precede quello corrente
+  // @cmember Ritorna un puntatore all'oggetto che precede quello corrente
   virtual TObject* pred_item( );
+
   // @cmember Ritorna il numero di elementi presenti come long  
-  long objects( )
-  { return _cnt; }
-  
+  virtual long objects() { return _cnt; }
+
+  // @cmember Ritorna il numero di elementi presenti
+  int items() const  { return _cnt; }
   // @cmember Cancella tutti gli elementi
   virtual void destroy();
 
@@ -111,30 +109,30 @@ public:
   // @cmember Elimina un oggetto
   bool remove(const char* key);
 
-  // @cmember Trova l'oggetto indicizzato
-  TObject& find(const char* key);
+  // @cmember Controlla l'esistenza di una chiave
+  bool is_key(const char* key) const ;
 
   // @cmember Ritorna l'oggetto con chiave key
   TObject* objptr(const char* key) const ;
 
-  // @cmember Controlla l'esistenza di una chiave
-  bool is_key(const char* key) const ;
+  // @cmember Trova l'oggetto indicizzato
+  TObject& find(const char* key) const ;
 
   // @cmember Ritorna l'indice del oggetto con chiave key (piu' intuitivo di <mf TAssoc_array::find>)
-  TObject& operator[] (const char* key)
+  TObject& operator[] (const char* key) const
   { return find(key); }
   
   // iterazione come TToken_string
   // si puo' adoperare get() e get_hashobj() intercambiabilmente ma
   // non sono indipendenti (entrambe avanzano gli stessi contatori)
 
+  // @cmember Azzera il numero di riga e colonna corrente della tabella hash
+  void restart()
+  { _row = 0; _col = 0; }
   // @cmember Ritorna solo l'oggetto
   TObject* get();
   // @cmember Ritorna l'oggetto e la relativa chiave
   THash_object* get_hashobj();
-  // @cmember Azzera il numero di riga e colonna corrente della tabella hash
-  void restart()
-  { _row = 0; _col = 0; }
                                                         
   // @cmember Mette chiavi e opzionalmente valori (come stringa) nel <c TString_array> passato  
   int get_keys(TString_array& kl, bool add_values = FALSE);