ada: Follow-on to Use inheritance in Gen_IL

Fix too-long line.

gcc/ada/ChangeLog:

	* gen_il-gen.adb: Fix too-long line.

diff --git a/gcc/ada/gen_il-gen.adb b/gcc/ada/gen_il-gen.adb
index 5064e8c6eb753b31df8a1e73a43316b23122ba7e..c200abc0223702a74a792361cbb31ef81ea78060 100644 (file)
--- a/gcc/ada/gen_il-gen.adb
+++ b/gcc/ada/gen_il-gen.adb
@@ -983,7 +983,8 @@ package body Gen_IL.Gen is
          end loop;
 
          Iterate_Types (Node_Kind, Pre => Check_Potential_Inheritance'Access);
-         Iterate_Types (Entity_Kind, Pre => Check_Potential_Inheritance'Access);
+         Iterate_Types
+           (Entity_Kind, Pre => Check_Potential_Inheritance'Access);
 
          if Could_Be_Inherited_Error then
             raise Illegal with "some fields could be inherited";