ada: Minor whitespace tuning

Code cleanup.

gcc/ada/ChangeLog:

	* exp_ch4.adb (Expand_N_Op_Multiply): Remove extra whitespace.

diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb
index b2cc672579f0e05000e8edfb74b11e8ce2037ca7..3817997c836ce1134188a45b58dadf4134345401 100644 (file)
--- a/gcc/ada/exp_ch4.adb
+++ b/gcc/ada/exp_ch4.adb
@@ -9271,9 +9271,9 @@ package body Exp_Ch4 is
       Rp2 : constant Boolean :=
               Nkind (Rop) = N_Op_Expon and then Is_Power_Of_2_For_Shift (Rop);
 
-      Ltyp : constant Entity_Id  := Etype (Lop);
-      Rtyp : constant Entity_Id  := Etype (Rop);
-      Typ  : Entity_Id           := Etype (N);
+      Ltyp : constant Entity_Id := Etype (Lop);
+      Rtyp : constant Entity_Id := Etype (Rop);
+      Typ  : Entity_Id          := Etype (N);
 
    begin
       Binary_Op_Validity_Checks (N);