commit b4a214f6fed4c2492278f9c7d2c5067c2992475c
author Peter Klausler <pklausler@nvidia.com> Fri Nov 19 15:17:55 2021 -0800
committer Copybara-Service <copybara-worker@google.com> Mon Nov 22 16:17:17 2021 -0800
tree 0eb2f6f8c9c6eb8d08761909b4bc550db0f4f8e3
parent e12ac905371c9e7a9825d08454f4e34c226dbe90

[flang] Correct the argument keyword for AIMAG(Z=...)

It was X= in the intrinsics table.

Differential Revision: https://reviews.llvm.org/D114296

GitOrigin-RevId: bb0d8e4bd9bc9426a5092368f086f52293dcc186

lib/Evaluate/intrinsics.cpp

diff --git a/lib/Evaluate/intrinsics.cpp b/lib/Evaluate/intrinsics.cpp
index bd17fd6..39e901c 100644
--- a/lib/Evaluate/intrinsics.cpp
+++ b/lib/Evaluate/intrinsics.cpp
@@ -281,7 +281,7 @@
     {"acosh", {{"x", SameFloating}}, SameFloating},
     {"adjustl", {{"string", SameChar}}, SameChar},
     {"adjustr", {{"string", SameChar}}, SameChar},
-    {"aimag", {{"x", SameComplex}}, SameReal},
+    {"aimag", {{"z", SameComplex}}, SameReal},
     {"aint", {{"a", SameReal}, MatchingDefaultKIND}, KINDReal},
     {"all", {{"mask", SameLogical, Rank::array}, OptionalDIM}, SameLogical,
         Rank::dimReduced, IntrinsicClass::transformationalFunction},