[Ada] Minor reformattings

[thirdparty/gcc.git] / gcc / ada / aspects.adb

diff --git a/gcc/ada/aspects.adb b/gcc/ada/aspects.adb
index 54c0e566ab00bbb9219c53ff67f0933ebc251023..3b8b7c4ec99c229108469807e6df11b18a1e6c97 100644 (file)
--- a/gcc/ada/aspects.adb
+++ b/gcc/ada/aspects.adb
@@ -226,8 +226,8 @@ package body Aspects is
          end if;
 
          if Is_Private_Type (Owner)
-            and then Present (Full_View (Owner))
-            and then not Operational_Aspect (A)
+           and then Present (Full_View (Owner))
+           and then not Operational_Aspect (A)
          then
             Owner := Full_View (Owner);
          end if;
@@ -572,7 +572,9 @@ package body Aspects is
     Aspect_Lock_Free                    => Aspect_Lock_Free,
     Aspect_Machine_Radix                => Aspect_Machine_Radix,
     Aspect_Max_Entry_Queue_Depth        => Aspect_Max_Entry_Queue_Depth,
+    Aspect_Max_Entry_Queue_Length       => Aspect_Max_Entry_Queue_Length,
     Aspect_Max_Queue_Length             => Aspect_Max_Queue_Length,
+    Aspect_No_Caching                   => Aspect_No_Caching,
     Aspect_No_Elaboration_Code_All      => Aspect_No_Elaboration_Code_All,
     Aspect_No_Inline                    => Aspect_No_Inline,
     Aspect_No_Return                    => Aspect_No_Return,