f18 accepts statement labels in fixed form source even if they follow a semicolon -- i.e., they're not in the fixed form's label field. Emit a warning for such usage. Differential Revision: https://reviews.llvm.org/D143817
5 lines
157 B
Fortran
5 lines
157 B
Fortran
! RUN: %flang_fc1 -fsyntax-only -pedantic %s 2>&1 | FileCheck %s
|
|
!CHECK: portability: Label should be in the label field
|
|
goto 1; 1 continue
|
|
end
|