PR debug/43329

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / print_fmt_4.f

! { dg-do compile }
      print precision(1.) ! { dg-error "must be of type default CHARACTER" }
      end