[flang-commits] [flang] [Flang] Change sizeof argument name to "x" (PR #130189)

[Andre Kuhlenschmidt via flang-commits]

https://github.com/akuhlens updated https://github.com/llvm/llvm-project/pull/130189

>From 166abccd00a4a4f07fbfc073f25236eb21ab0b10 Mon Sep 17 00:00:00 2001
From: Andre Kuhlenschmidt <akuhlenschmi at nvidia.com>
Date: Thu, 6 Mar 2025 14:14:39 -0800
Subject: [PATCH] Change sizeof argument name to x and add test

---
 flang/lib/Evaluate/intrinsics.cpp |  2 +-
 flang/test/Semantics/sizeof.f90   | 10 ++++++++++
 2 files changed, 11 insertions(+), 1 deletion(-)
 create mode 100644 flang/test/Semantics/sizeof.f90

diff --git a/flang/lib/Evaluate/intrinsics.cpp b/flang/lib/Evaluate/intrinsics.cpp
index dc0ccd2cb342a..ae77dc8d11f44 100644
--- a/flang/lib/Evaluate/intrinsics.cpp
+++ b/flang/lib/Evaluate/intrinsics.cpp
@@ -940,7 +940,7 @@ static const IntrinsicInterface genericIntrinsicFunction[]{
             OptionalDIM, // unless array is assumed-size
             SizeDefaultKIND},
         KINDInt, Rank::scalar, IntrinsicClass::inquiryFunction},
-    {"sizeof", {{"a", AnyData, Rank::anyOrAssumedRank}}, SubscriptInt,
+    {"sizeof", {{"x", AnyData, Rank::anyOrAssumedRank}}, SubscriptInt,
         Rank::scalar, IntrinsicClass::inquiryFunction},
     {"spacing", {{"x", SameReal}}, SameReal},
     {"spread",
diff --git a/flang/test/Semantics/sizeof.f90 b/flang/test/Semantics/sizeof.f90
new file mode 100644
index 0000000000000..367b0bc9f234d
--- /dev/null
+++ b/flang/test/Semantics/sizeof.f90
@@ -0,0 +1,10 @@
+! RUN: %python %S/test_errors.py %s %flang_fc1
+  character(len=20) :: a, b
+  if (sizeof(a) == sizeof(x=b)) then
+    print *, "pass"
+  else
+    print *, "fail"
+  end if
+  !ERROR: unknown keyword argument to intrinsic 'sizeof'
+  print *, sizeof(a=a)
+end
\ No newline at end of file