📄 assign_3.f90
字号:
! { dg-do compile }! Option passed to avoid excess errors from obsolete warning! { dg-options "-w" }! PR18827 integer i,j equivalence (i,j) assign 1000 to i write (*, j) ! { dg-error "not been assigned a format label" } goto j ! { dg-error "not been assigned a target label" } 1000 continue end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -