6 open (1, blank
=char(1000,4)) ! { dg-error "must be a character string of default kind" }
7 open (2, decimal
=char(1000,4)) ! { dg-error "must be a character string of default kind" }
8 open (3, encoding
=char(1000,4)) ! { dg-error "must be a character string of default kind" }
9 open (4, round
=char(1000,4)) ! { dg-error "must be a character string of default kind" }
10 open (5, sign
=char(1000,4)) ! { dg-error "must be a character string of default kind" }