gcc/testsuite/gfortran.dg/pr90988_4.f

c { dg-do compile }
c { dg-require-visibility "" }
       module foo
          implicit none
          real a,b,c
          integer i,j,k
          public a,b
          publicc
          private i,j
          privatek
       end module foo