Specification of package Tgx.String_Indexes







 ========================================================================= --
 ===                                                                   === --
 ===                 Top Graph'X CORBA Implementation                  === --
 ===                                                                   === --
 ===                 Copyright (c) 2000, Top Graph'X.                  === --
 ===                                                                   === --
 ===                     --- Copyright Notice ---                      === --
 ===                                                                   === --
 ===    This software is protected as an unpublished work under the    === --
 ===     Copyright Act of 1976.  All rights reserved.  Top Graph'X.    === --
 ===                                                                   === --
 ========================================================================= --

package Tgx.String_Indexes is
   type Signature is mod 2**32 ;

   type Signature_Array is array (Positive range <>) of Signature ;

   type String_Constant is access constant String ;

   type String_Array is array (Positive range <>) of String_Constant ;

    Signatures return the signatures corresponding to the given string table
    Scale is modified so that each signature is garanteed to be different
    from any other one in the returned signature table
    Scale is better if it is a prime number
    Result must have the same range as Constants
   procedure Signatures ( Constants : in String_Array ;
                          Scale     : in out Signature ;
                          Result    : out Signature_Array) ;

    Index returns the index of Value in the Constants table
    Index returns 0 if not found
    Constants should be previously calculated using the Scale value given
   function Index ( Constants : in Signature_Array ;
                    Value     : in String ;
                    Scale     : in Signature) return Natural ;
end Tgx.String_Indexes ;



List of definition uses










This page was generated by PrismTech's ada2html on Friday Mai 12 2006 16:18