18 lines
403 B
Fortran
18 lines
403 B
Fortran
|
! Verify that -fdebug-dump-all dumps both symbols and the parse tree, even when semantic errors are present
|
||
|
|
|
||
|
|
!----------
|
||
|
|
! RUN lines
|
||
|
|
!----------
|
||
|
|
! RUN: not %flang_fc1 -fdebug-dump-all %s 2>&1 | FileCheck %s
|
||
|
|
|
||
|
|
! CHECK: error: Semantic errors in
|
||
|
|
! CHECK: Flang: parse tree dump
|
||
|
|
! CHECK: Flang: symbols dump
|
||
|
|
|
||
|
|
program bad
|
||
|
|
type dt(k)
|
||
|
|
integer(kind=16) :: k
|
||
|
|
integer(kind=16) :: comp
|
||
|
|
end type dt
|
||
|
|
end
|