Reduce change noise

Author: Meinersbur

flang-rt/include/flang-rt/array-constructor.h

@@ -44,6 +44,14 @@ struct ArrayConstructorVector {
   unsigned char useValueLengthParameters_ : 1;
 };
 
+static_assert(sizeof(Fortran::runtime::ArrayConstructorVector) <=
+        MaxArrayConstructorVectorSizeInBytes,
+    "ABI requires sizeof(ArrayConstructorVector) to be smaller than "
+    "MaxArrayConstructorVectorSizeInBytes");
+static_assert(alignof(Fortran::runtime::ArrayConstructorVector) <=
+        MaxArrayConstructorVectorAlignInBytes,
+    "ABI requires alignof(ArrayConstructorVector) to be smaller than "
+    "MaxArrayConstructorVectorAlignInBytes");
 
 } // namespace Fortran::runtime
 #endif /* FLANG_RT_ARRAY_CONSTRUCTOR_H_ */

flang-rt/lib/flang_rt/allocatable.cpp

@@ -16,10 +16,6 @@
 #include "flang/Common/ISO_Fortran_binding_wrapper.h"
 #include "flang/Runtime/assign.h"
 
-using Fortran::common::TypeCategory;
-
-
-
 namespace Fortran::runtime {
 extern "C" {
 RT_EXT_API_GROUP_BEGIN

flang-rt/lib/flang_rt/type-code.cpp

@@ -7,7 +7,6 @@
 //===----------------------------------------------------------------------===//
 
 #include "flang-rt/type-code.h"
-#include <cstdint>
 
 namespace Fortran::runtime {
 

flang-rt/lib/flang_rt/type-info.cpp

@@ -85,14 +85,10 @@ RT_API_ATTRS std::size_t Component::SizeInBytes(
     return GetElementByteSize(instance) * GetElements(instance);
   } else if (category() == TypeCategory::Derived) {
     const DerivedType *type{derivedType()};
-    auto bytes {Descriptor::SizeInBytes(
-        rank_, true, type ? type->LenParameters() : 0)};
-    assert(bytes <=  MaxDescriptorSizeInBytes(  rank_, true, type ? type->LenParameters() : 0));
-    return bytes;
+    return Descriptor::SizeInBytes(
+         rank_, true, type ? type->LenParameters() : 0);
   } else {
-    auto bytes{ Descriptor::SizeInBytes(rank_)};
-        assert(bytes <=  MaxDescriptorSizeInBytes(  rank_));
-        return bytes;
+    return Descriptor::SizeInBytes(rank_);
   }
 }
 

flang/include/flang/Runtime/allocatable.h

@@ -15,6 +15,7 @@
 #include "flang/Runtime/entry-names.h"
 
 namespace Fortran::runtime {
+
 extern "C" {
 
 // Initializes the descriptor for an allocatable of intrinsic or derived type.