===================================================================
@@ -1,4 +1,5 @@
! { dg-do run }
+! { dg-require-visibility "" }
!
! PR 84504: [F08] procedure pointer variables cannot be initialized with functions returning pointers
!
===================================================================
@@ -1,4 +1,5 @@
! { dg-do run }
+! { dg-require-visibility "" }
!
! Tests the fix for PR68846 in which compiler generated temporaries were
! receiving the attributes of dummy arguments. This test is the original.