--
-- Token-Specific Information for the Spelling Checker
--
package Token_Definition is

    --
    -- Definition of a Token (Word)
    --
    Token_Length : constant Natural := 25;  -- number of characters
    subtype Token_String is String (1 .. Token_Length);
    type Token_Type is
        record
            Word : Token_String;
            Length : Natural;
        end record;

    --
    -- Routine to Return Flag indicating if passed char is a special character
    --
    function Is_Special_Char (Ch : Character) return Boolean;

end Token_Definition;