Re: Charles container library usage examples

[Ludovic Brenta <ludovic@ludovic-brenta.org>]

David, in the past I also played with Charles and instantiated a
hashed map of Unbounded_Strings, which I used to represent the headers
in an email, and then a List_Of_Regexes.  You might be interested in
how I did the instantiations:

-- maps_of_headers.ads
with Ada.Strings.Unbounded; use Ada.Strings.Unbounded;
with Charles.Hash_String;
with Charles.Maps.Hashed.Strings.Unbounded;

private package Maps_Of_Headers is
   new Charles.Maps.Hashed.Strings.Unbounded (Element_Type => Unbounded_String,
                                              Hash => Charles.Hash_String);

-- list_of_regexes.ads
with Ada.Strings.Unbounded; use Ada.Strings.Unbounded;

with Charles.Vectors.Unbounded;

package Lists_Of_Regexes is
   new Charles.Vectors.Unbounded (Index_Type => Positive,
                                  Element_Type => Unbounded_String);

(This toy program served me well as a "Spam Killer", which is its
name; it reads a list of regular expressions in my .emacs file, uses a
POP3 Ada binding to query my mailbox, and deletes all email in the
mailbox that matches any of the regular expressions.  I used it from a
cron job and it would kill 50-100 spam mails a day, when my address
was under heavy attack.  Now the problem has subsided :) )

HTH

-- 
Ludovic Brenta.