with Text_Io, Token_Definition;
package Misspelled_Word_List is
    --------------------------------------------------------------------------
    -- Abstract   : This package maintains a list of tokens with a frequency
    --              count and prints the list in ascending order on request.
    --------------------------------------------------------------------------

    procedure Initialize;
    --------------------------------------------------------------------------
    -- Abstract   : This procedure empties the misspelled word list.
    --------------------------------------------------------------------------

    procedure Add_Token (Token : Token_Definition.Token_Type);
    --------------------------------------------------------------------------
    -- Abstract   : This procedure inserts a token into the linked list in
    --              ascending order (or if already in the list, increments
    --              its count).
    --------------------------------------------------------------------------
    -- Parameters : Token - is the token to be inserted into the list.
    --------------------------------------------------------------------------

    procedure Print (File : Text_Io.File_Type);
    --------------------------------------------------------------------------
    -- Abstract   : Print the list (token and count) from head to tail, one
    --              element per line.  The count is printed in columns beyond
    --              the maximum length of a token so that the file may be used
    --              as a dictionary.
    --------------------------------------------------------------------------
    -- Parameters : File - is the file to which the list is to be written.
    --------------------------------------------------------------------------

end Misspelled_Word_List;