c7f8bc0ee8
In free form, don't silently skip over an invalid space between an underscore and a kind parameter. Differential Revision: https://reviews.llvm.org/D142760
5 lines
108 B
Fortran
5 lines
108 B
Fortran
! RUN: not %flang_fc1 -fsyntax-only %s 2>&1 | FileCheck %s
|
|
! CHECK: 3:8: error: invalid space
|
|
x = 1._ 4
|
|
end
|