blob: 1cda096c422d632588813aec7e452c2aba1d48f9 (
plain)
1
2
3
4
5
6
7
8
|
! { dg-do compile }
! PR fortran/91650
! Code contributed by Gerhard Steinmetz.
program p
print *, b'10110' ! { dg-error "cannot appear in an output IO list" }
print *, o'10110' ! { dg-error "cannot appear in an output IO list" }
print *, z'10110' ! { dg-error "cannot appear in an output IO list" }
end
|
