blob: 35ee82878fcc613c9e40157b4fb4d5c54e7dd7d5 [file] [log] [blame]
c { dg-do run }
c { dg-options "-std=legacy" }
bytea
a = 1
if (a /= 1 .and. kind(a) /= a) stop 1
end