[multiple changes]
[gcc.git] / gcc / ada / sem_ch7.adb
index bb47589004908353d4e3bbcc16b150e65bf39b1b..8c318fddc73d8d9fc3a3540359a9550944c24ca6 100644 (file)
@@ -2586,7 +2586,7 @@ package body Sem_Ch7 is
                               (Priv, Finalize_Storage_Only
                                                    (Base_Type (Full)));
             Propagate_Type_Has_Flags
-                              (Priv, Base_Type (Full));
+                              (Priv,                Base_Type (Full));
             Set_Has_Controlled_Component
                               (Priv, Has_Controlled_Component
                                                    (Base_Type (Full)));