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"));


	When I try to compile I get following error: 

gnatmake -gnatf gettext -I../charles 2>&1|head
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 "New_Item" in call
to "insert" declared at charles-strings-unbounded.ads:180
gettext.adb:133:10: missing argument for parameter "New_Item" in call
to "insert" declared at charles-strings-unbounded.ads:175
gettext.adb:133:10: missing argument for parameter "New_Item" in call
to "insert" declared at charles-strings-unbounded.ads:170
gettext.adb:133:10: missing argument for parameter "New_Item" in call
to "insert" declared at charles-strings-unbounded.ads:164
gettext.adb:133:10: missing argument for parameter "Count" in call to
"insert" declared at charles-strings-unbounded.ads:159
gettext.adb:133:10: missing argument for parameter "New_Item" in call
to "insert" declared at a-strunb.ads:274
gettext.adb:133:10: missing argument for parameter "New_Item" in call
to "insert" declared at a-strunb.ads:268
gnatmake: "gettext.adb" compilation error

	What's wrong?.. fbsd 4.8, gnat 3.15p built from ports, 
charles-20030320.zip.