[flang] Add one missed semantic check for named constant in common block
authorPeixinQiao <qiaopeixin@huawei.com>
Wed, 8 Jun 2022 16:43:30 +0000 (00:43 +0800)
committerPeixinQiao <qiaopeixin@huawei.com>
Wed, 8 Jun 2022 16:43:30 +0000 (00:43 +0800)
commit1f17a8978c32af4b65615d32f367c341bacb4770
tree731e63712978c013ff4f59432688edaf4035c74b
parentb6713feec76af095fa066aa6a4aad72783e5d7d2
[flang] Add one missed semantic check for named constant in common block

As Fortran 2018 R874, common block object must be one variable name, which
cannot be one named constant. Add this check.

Reviewed By: klausler

Differential Revision: https://reviews.llvm.org/D126762
flang/lib/Semantics/resolve-names.cpp
flang/test/Semantics/declarations01.f90