(3) package Ada.Strings is pragma Pure(Strings); (4) Space : constant Character := ' '; Wide_Space : constant Wide_Character := ' '; (5) Length_Error, Pattern_Error, Index_Error, Translation_Error : exception; (6) type Alignment is (Left, Right, Center); type Truncation is (Left, Right, Error); type Membership is (Inside, Outside); type Direction is (Forward, Backward); type Trim_End is (Left, Right, Both); end Ada.Strings;
-- Email comments, additions, corrections, gripes, kudos, etc. to:
Magnus Kempe -- Magnus.Kempe@di.epfl.ch