[gcc r16-1816] ada: Fix bug in -gnatw.o switch (unreferenced out parameters)

[Marc Poulhies via Gcc-cvs]

https://gcc.gnu.org/g:0558fc324b49b16befcbf50ad703050430477211

commit r16-1816-g0558fc324b49b16befcbf50ad703050430477211
Author: Bob Duff <d...@adacore.com>
Date:   Sun Apr 27 15:15:51 2025 -0400

    ada: Fix bug in -gnatw.o switch (unreferenced out parameters)
    
    Fixes this bug: If -gnatw.o is specified, it is ignored unless
    -gnatwm is also specified (either directly, or as part of a
    catch-all switch like -gnatwa).
    
    gcc/ada/ChangeLog:
    
            * sem_warn.adb (Warn_On_Useless_Assignments):
            Enable Warn_On_Useless_Assignment in the case of
            Warn_On_All_Unread_Out_Parameters.

Diff:
---
 gcc/ada/sem_warn.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/ada/sem_warn.adb b/gcc/ada/sem_warn.adb
index 74f9fe304dfb..32eee3370e26 100644
--- a/gcc/ada/sem_warn.adb
+++ b/gcc/ada/sem_warn.adb
@@ -4743,7 +4743,7 @@ package body Sem_Warn is
       Ent : Entity_Id;
 
    begin
-      if Warn_On_Modified_Unread
+      if (Warn_On_Modified_Unread or Warn_On_All_Unread_Out_Parameters)
         and then In_Extended_Main_Source_Unit (E)
       then
          Ent := First_Entity (E);