File : a-string.ads

     ------------------------------------------------------------------------------
     --                                                                          --
     --                         GNAT RUNTIME COMPONENTS                          --
     --                                                                          --
   5 --                          A D A . S T R I N G S                           --
     --                                                                          --
     --                                 S p e c                                  --
     --                                                                          --
     --                            $Revision: 1.6 $                              --
  10 --                                                                          --
     -- This specification is adapted from the Ada Reference Manual for use with --
     -- GNAT.  In accordance with the copyright of that document, you can freely --
     -- copy and modify this specification,  provided that if you redistribute a --
     -- modified version,  any changes that you have made are clearly indicated. --
  15 --                                                                          --
     ------------------------------------------------------------------------------
     
     package Ada.Strings is
     pragma Pure (Strings);
  20 
        Space      : constant Character      := ' ';
        Wide_Space : constant Wide_Character := ' ';
     
        Length_Error, Pattern_Error, Index_Error, Translation_Error : exception;
  25 
        type Alignment  is (Left, Right, Center);
        type Truncation is (Left, Right, Error);
        type Membership is (Inside, Outside);
        type Direction  is (Forward, Backward);
  30    type Trim_End   is (Left, Right, Both);
     
     end Ada.Strings;