From dc1f64ac929a1518ac202c4059a0eea45b0c442f Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Wed, 6 Jun 2007 12:20:30 +0200 Subject: a-stzunb.adb, [...]: (Insert): Use 'Length instead of 'Size. 2007-04-20 Arnaud Charlet * a-stzunb.adb, a-stwiun.adb, a-strunb.adb: (Insert): Use 'Length instead of 'Size. * a-stwifi.ads, a-stzfix.ads: Minor reformatting From-SVN: r125378 --- gcc/ada/a-stzfix.ads | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'gcc/ada/a-stzfix.ads') diff --git a/gcc/ada/a-stzfix.ads b/gcc/ada/a-stzfix.ads index 4c3f80b..f6b3135 100644 --- a/gcc/ada/a-stzfix.ads +++ b/gcc/ada/a-stzfix.ads @@ -235,10 +235,10 @@ package Ada.Strings.Wide_Wide_Fixed is return Wide_Wide_String; procedure Tail - (Source : in out Wide_Wide_String; - Count : Natural; + (Source : in out Wide_Wide_String; + Count : Natural; Justify : Alignment := Left; - Pad : Wide_Wide_Character := Ada.Strings.Wide_Wide_Space); + Pad : Wide_Wide_Character := Ada.Strings.Wide_Wide_Space); -------------------------------------------- -- Wide_Wide_String Constructor Functions -- -- cgit v1.1