badline.f

来自「用于进行gcc测试」· F 代码 · 共 5 行

        subroutine foo 
# 18 "src/badline.F" 2
        end
! { dg-warning "left but not entered" "" { target *-*-* } 2 }