From bb0d8e4bd9bc9426a5092368f086f52293dcc186 Mon Sep 17 00:00:00 2001 From: Peter Klausler Date: Fri, 19 Nov 2021 15:17:55 -0800 Subject: [PATCH] [flang] Correct the argument keyword for AIMAG(Z=...) It was X= in the intrinsics table. Differential Revision: https://reviews.llvm.org/D114296 --- flang/lib/Evaluate/intrinsics.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/flang/lib/Evaluate/intrinsics.cpp b/flang/lib/Evaluate/intrinsics.cpp index bd17fd6..39e901c 100644 --- a/flang/lib/Evaluate/intrinsics.cpp +++ b/flang/lib/Evaluate/intrinsics.cpp @@ -281,7 +281,7 @@ static const IntrinsicInterface genericIntrinsicFunction[]{ {"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}, -- 2.7.4