blob: 135546b142bfaeda9e4e86448df8a26c7cce4f97 [file] [log] [blame]
C { dg-do run }
C Option passed to avoid excess errors from obsolete warning
C { dg-options "-w" }
C PR22290
integer nz
assign 93 to nz
go to nz,(93)
93 continue
end