2012-10-01 Arnaud Charlet <charlet@adacore.com>

	* a-catizo.adb, a-stwiun.adb, a-cdlili.adb, a-cihama.adb, a-direct.adb,
	a-coinve.adb, a-calend.adb, a-ciorse.adb, a-coorma.adb, a-cfdlli.adb,
	a-stzunb-shared.adb, a-cfhase.adb, bindgen.adb, ceinfo.adb, a-tags.adb,
	einfo.adb, checks.adb, eval_fat.adb, a-cborma.adb, a-stwifi.adb,
	a-tifiio.adb, a-textio.adb, a-cidlli.adb, a-strunb-shared.adb,
	a-cimutr.adb, a-calcon.adb, a-exexpr-gcc.adb, a-ciormu.adb,
	a-stzunb.adb, a-stzsea.adb, a-ngelfu.adb, a-stzfix.adb,
	a-cihase.adb, a-cohama.adb, a-exetim-posix.adb, a-dirval-vms.adb,
	a-caldel-vms.adb, a-coorse.adb, errout.adb,
	a-except.adb, butil.adb, a-dirval-mingw.adb, a-cforma.adb,
	a-except-2005.adb, a-wtedit.adb, cstand.adb, a-stwiun-shared.adb,
	a-cbhama.adb, a-direio.adb, clean.adb, a-cborse.adb, back_end.adb,
	binde.adb, a-exexda.adb, a-comutr.adb, a-ciorma.adb, a-cobove.adb,
	a-coormu.adb, a-teioed.adb, a-convec.adb, a-wtenau.adb, exp_aggr.adb,
	a-ztedit.adb, a-cohase.adb, a-exetim-mingw.adb, bcheck.adb,
	a-dynpri.adb, a-cfhama.adb, a-calfor.adb, a-cbdlli.adb,
	a-crdlli.adb, a-cbmutr.adb, a-sequio.adb, a-ngcoar.adb, a-cforse.adb,
	a-strunb.adb, a-calend-vms.adb, a-clrefi.adb, a-cofove.adb,
	a-ztenau.adb, a-strfix.adb, a-cbhase.adb, a-stzsup.adb: Minor
	reformatting.



git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@191905 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 11 insertions, 11 deletions

diff --git a/gcc/ada/a-calend.adb b/gcc/ada/a-calend.adb
index 3d70cf4f43b..dbc95771e71 100644
--- a/gcc/ada/a-calend.adb
+++ b/gcc/ada/a-calend.adb
@@ -177,29 +177,29 @@ package body Ada.Calendar is
    --  UTC, it must be increased to include all leap seconds.
 
    Ada_High_And_Leaps : constant Time_Rep :=
-                          Ada_High + Time_Rep (Leap_Seconds_Count) * Nano;
+     Ada_High + Time_Rep (Leap_Seconds_Count) * Nano;
 
    --  Two constants used in the calculations of elapsed leap seconds.
    --  End_Of_Time is later than Ada_High in time zone -28. Start_Of_Time
    --  is earlier than Ada_Low in time zone +28.
 
    End_Of_Time   : constant Time_Rep :=
-                     Ada_High + Time_Rep (3) * Nanos_In_Day;
+     Ada_High + Time_Rep (3) * Nanos_In_Day;
    Start_Of_Time : constant Time_Rep :=
-                     Ada_Low - Time_Rep (3) * Nanos_In_Day;
+     Ada_Low - Time_Rep (3) * Nanos_In_Day;
 
    --  The Unix lower time bound expressed as nanoseconds since the start of
    --  Ada time in UTC.
 
    Unix_Min : constant Time_Rep :=
-                Ada_Low + Time_Rep (17 * 366 + 52 * 365) * Nanos_In_Day;
+     Ada_Low + Time_Rep (17 * 366 + 52 * 365) * Nanos_In_Day;
 
    --  The Unix upper time bound expressed as nanoseconds since the start of
    --  Ada time in UTC.
 
    Unix_Max : constant Time_Rep :=
-                Ada_Low + Time_Rep (34 * 366 + 102 * 365) * Nanos_In_Day +
-                          Time_Rep (Leap_Seconds_Count) * Nano;
+     Ada_Low + Time_Rep (34 * 366 + 102 * 365) * Nanos_In_Day +
+     Time_Rep (Leap_Seconds_Count) * Nano;
 
    Epoch_Offset : constant Time_Rep := (136 * 365 + 44 * 366) * Nanos_In_Day;
    --  The difference between 2150-1-1 UTC and 1970-1-1 UTC expressed in
@@ -367,7 +367,7 @@ package body Ada.Calendar is
       --  by adding the number of nanoseconds between the two origins.
 
       Res_N : Time_Rep :=
-                Duration_To_Time_Rep (System.OS_Primitives.Clock) + Unix_Min;
+        Duration_To_Time_Rep (System.OS_Primitives.Clock) + Unix_Min;
 
    begin
       --  If the target supports leap seconds, determine the number of leap
@@ -1283,7 +1283,7 @@ package body Ada.Calendar is
          else
             declare
                Off : constant Long_Integer :=
-                       UTC_Time_Offset (Time (Date_N), Is_Historic);
+                 UTC_Time_Offset (Time (Date_N), Is_Historic);
 
             begin
                Date_N := Date_N + Time_Rep (Off) * Nano;
@@ -1506,11 +1506,11 @@ package body Ada.Calendar is
          else
             declare
                Cur_Off   : constant Long_Integer :=
-                             UTC_Time_Offset (Time (Res_N), Is_Historic);
+                 UTC_Time_Offset (Time (Res_N), Is_Historic);
                Cur_Res_N : constant Time_Rep :=
-                             Res_N - Time_Rep (Cur_Off) * Nano;
+                 Res_N - Time_Rep (Cur_Off) * Nano;
                Off       : constant Long_Integer :=
-                             UTC_Time_Offset (Time (Cur_Res_N), Is_Historic);
+                 UTC_Time_Offset (Time (Cur_Res_N), Is_Historic);
 
             begin
                Res_N := Res_N - Time_Rep (Off) * Nano;