9a883bfa11
Remove resolved & moot TODO comments in Common/, Parser/, and Evaluate/. Address a pending one relating to parsing ambiguity in DATA statement constants, handling it with symbol table information in Semantics and adding a test. Differential Revision: https://reviews.llvm.org/D93323
15 lines
286 B
Fortran
15 lines
286 B
Fortran
! RUN: %S/test_errors.sh %s %t %f18
|
|
type :: t
|
|
integer :: n
|
|
end type
|
|
type(t) :: x
|
|
real, target, save :: a(1)
|
|
real, parameter :: arrparm(1) = [3.14159]
|
|
real, pointer :: p
|
|
real :: y
|
|
data x/t(1)/
|
|
data p/a(1)/
|
|
!ERROR: DATA statement value initializes 'y' with an array
|
|
data y/arrparm/
|
|
end
|