[gcc r15-6573] ada: Follow-on to Use inheritance in Gen_IL

[Marc Poulhi?s via Gcc-cvs]

https://gcc.gnu.org/g:42c115ee820c029acec5707d123fd771684e9a5b

commit r15-6573-g42c115ee820c029acec5707d123fd771684e9a5b
Author: Bob Duff <d...@adacore.com>
Date:   Mon Dec 9 17:45:17 2024 -0500

    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:
---
 gcc/ada/gen_il-gen.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gcc/ada/gen_il-gen.adb b/gcc/ada/gen_il-gen.adb
index 5064e8c6eb75..c200abc02237 100644
--- 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";