[flang-commits] [flang] [Flang] Diagnose nonvariable STAT= specifiers (PR #219696)

[Eugene Epshteyn via flang-commits]

================
@@ -47,6 +47,8 @@ subroutine s1()
   rVar1 = rCoarray[1,2,3,STAT=rVar2]
   !ERROR: Must be a scalar value, but is a rank-1 array
   rVar1 = rCoarray[1,2,3,STAT=intArray]
+  !ERROR: STAT= specifier must be a scalar integer variable
+  rVar1 = rCoarray[1,2,3,STAT=MASK(2)]
----------------
eugeneepshteyn wrote:

Please also add named constant case:
```fortran
  !ERROR: STAT= specifier must be a scalar integer variable
  rVar1 = rCoarray[1,2,3,STAT=kConst]   ! named constant: F'2023 C901, the other IsVariable route
```

https://github.com/llvm/llvm-project/pull/219696