[gcc(refs/users/mikael/heads/stabilisation_descriptor_v01)] Ajout directive warning

[Mikael Morin via Gcc-cvs]

https://gcc.gnu.org/g:e6eb899b5e7ce65a45db2fa7d90693f2509812f1

commit e6eb899b5e7ce65a45db2fa7d90693f2509812f1
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Tue Jul 8 22:41:06 2025 +0200

    Ajout directive warning

Diff:
---
 libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90 
b/libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90
index 14e8f99d391e..d95479599e49 100644
--- a/libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90
+++ b/libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90
@@ -25,7 +25,7 @@ program main
   character(len=:), allocatable :: my_str
   character(len=15), allocatable :: my_str15
 
-  A = [(3*j, j=1, 10)]
+  A = [(3*j, j=1, 10)] ! { dg-warning {may be used uninitialized} {variables 
used uninitialized in dead code} { target { ! __OPTIMIZE__ } } }
   call foo (A, size(A))
   call bar (A)
   my_str = "1234567890"