Re: using charles library

[rm@gunlab.com.ru (Roman V. Isaev)]

> > I'm learning the ropes, so it might be stupid question but I tried
> > use charles.maps.sorted.strings.unbounded (used sample code by 
> > mheaney@on2.com from this newsgroup archive):
> > with Ada.Strings.Unbounded; use Ada.Strings.Unbounded;
> > with Charles.Maps.Sorted.Strings.Unbounded;
> > with Charles.Strings.Unbounded; use Charles.Strings.Unbounded;
> > package body gettext is
> >    package Translation_Tables is
> >       new Charles.Maps.Sorted.Strings.Unbounded
> >         (Element_Type => Charles.Strings.Unbounded.Container_Type);
> >    TT : Translation_Tables.Container_Type;
> > ........
> >    procedure load_mo_file is
> > ........
> >          Insert(TT, "key", Element => To_Container("value"));
> Because it is:
>            Insert(TT, "key", New_Item => To_Container("value"));
> as I can see from the .ads file although I haven't tried to compile
> this.

   It still complains: 

gnatmake -gnatf gettext -I../charles
adagcc -c -gnatf -I../charles gettext.adb
gettext.adb:133:10: no candidate interpretations match the actuals:
gettext.adb:133:10: missing argument for parameter "Index" in call to
"insert" declared at charles-strings-unbounded.ads:180
gettext.adb:133:10: missing argument for parameter "Count" in call to
"insert" declared at charles-strings-unbounded.ads:159
gettext.adb:133:17: expected private type "unbounded.Container_Type"
defined at charles-strings-unbounded.ads:41
gettext.adb:133:17: found private type "test.Container_Type" defined
at charles-maps-sorted-strings-unbounded.ads:63, instance at line 12
gettext.adb:133:17:   ==> in call to "Insert" at
charles-strings-unbounded.ads:175
gettext.adb:133:17:   ==> in call to "Insert" at
charles-strings-unbounded.ads:170
gettext.adb:133:17:   ==> in call to "Insert" at
charles-strings-unbounded.ads:164
gettext.adb:133:17:   ==> in call to "Insert" at a-strunb.ads:274
gnatmake: "gettext.adb" compilation error

   I wonder is there any package easier to use? I only want two
functions, something like store(key,value) and lookup(key), that's
all, without 20+ string declaration voodoo... Grrrrr. I miss perl's
associative arrays.