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

commit a8bc113ef2e4803083f2d943a1e3c06d459fe6ed
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Wed Jul 9 10:39:38 2025 +0200

    Revert "Ajout directive warning"
    
    This reverts commit 1268e25a196e41ebeba91f41271538fd56f0d850.

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

diff --git a/libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90 
b/libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90
index 4ac7e06e2c5e..14e8f99d391e 100644
--- a/libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90
+++ b/libgomp/testsuite/libgomp.oacc-fortran/privatized-ref-2.f90
@@ -21,11 +21,11 @@
 program main
   implicit none (type, external)
   integer :: j
-  integer, allocatable :: A(:) ! { dg-note {declared here} {A's fields used 
initialized in dead code} { target { ! __OPTIMIZE__ } } }
+  integer, allocatable :: A(:)
   character(len=:), allocatable :: my_str
   character(len=15), allocatable :: my_str15
 
-  A = [(3*j, j=1, 10)] ! { dg-warning {may be used uninitialized} {A's fields 
used uninitialized in dead code} { target { ! __OPTIMIZE__ } } }
+  A = [(3*j, j=1, 10)]
   call foo (A, size(A))
   call bar (A)
   my_str = "1234567890"

Reply via email to