Fortran: OpenMP 5.0 (in_,task_)reduction clause extensions

[gcc.git] / gcc / testsuite / gfortran.dg / oldstyle_5.f

C { dg-do compile }
      TYPE T
      INTEGER A(2)/1,2/ ! { dg-error "Invalid old style initialization for derived type component" }
      END TYPE
      TYPE S
      INTEGER B/1/ ! { dg-error "Invalid old style initialization for derived type component" }
      END TYPE
      END