[flang-commits] [flang] [Flang] Fold complex ** (1, 0) to identity in constant folding (PR #213256)

[via flang-commits]

ShashwathiNavada wrote:

Thank you for working on this!
I have one small suggestion, could you add a case with a nonzero imaginary part and compare the full complex value?

e.g.:
```fortran
complex(8), parameter :: z = (3.0_8, 4.0_8)
logical, parameter :: test_cpow_unity_full = z**(1.0_8, 0.0_8) == z
```

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