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

via flang-commits flang-commits at lists.llvm.org
Wed Mar 26 12:34:39 PDT 2025


Author: Andre Kuhlenschmidt
Date: 2025-03-26T12:34:36-07:00
New Revision: 3ab70e3f90f43f33bd3180c1c3a9f9b00c4d6922

URL: https://github.com/llvm/llvm-project/commit/3ab70e3f90f43f33bd3180c1c3a9f9b00c4d6922
DIFF: https://github.com/llvm/llvm-project/commit/3ab70e3f90f43f33bd3180c1c3a9f9b00c4d6922.diff

LOG: [Flang] Change sizeof argument name to "x" (#130189)

This closes #128610 by fixing the name of the argument to the sizeof
function to be "x" and adds a test.

Added: 
    flang/test/Semantics/sizeof.f90

Modified: 
    flang/lib/Evaluate/intrinsics.cpp

Removed: 
    


################################################################################
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


        


More information about the flang-commits mailing list