xref: /llvm-project/flang/test/Semantics/resolve01.f90 (revision 6c1ac141d3c98af9738bc77fcb55602cbff7751f)
1*6c1ac141SIvan Zhechev! RUN: %python %S/test_errors.py %s %flang_fc1
264ab3302SCarolineConcattointeger :: x
364ab3302SCarolineConcatto!ERROR: The type of 'x' has already been declared
464ab3302SCarolineConcattoreal :: x
564ab3302SCarolineConcattointeger(8) :: i
664ab3302SCarolineConcattoparameter(i=1,j=2,k=3)
764ab3302SCarolineConcattointeger :: j
864ab3302SCarolineConcatto!ERROR: The type of 'k' has already been implicitly declared
964ab3302SCarolineConcattoreal :: k
1064ab3302SCarolineConcattoend
11