Use shape_id for determining "too complex"

[ruby.git] / internal / array.h
diff --git a/internal/array.h b/internal/array.h

index 17d91a8..398676d 100644 (file)
--- a/internal/array.h
+++ b/internal/array.h
@@ -23,6 +23,7 @@
  #define RARRAY_PTR_IN_USE_FLAG  FL_USER14
  
  /* array.c */
+VALUE rb_ary_hash_values(long len, const VALUE *elements);
  VALUE rb_ary_last(int, const VALUE *, VALUE);
  void rb_ary_set_len(VALUE, long);
  void rb_ary_delete_same(VALUE, VALUE);
@@ -35,13 +36,12 @@ void rb_ary_cancel_sharing(VALUE ary);
  size_t rb_ary_size_as_embedded(VALUE ary);
  void rb_ary_make_embedded(VALUE ary);
  bool rb_ary_embeddable_p(VALUE ary);
+VALUE rb_ary_diff(VALUE ary1, VALUE ary2);
+RUBY_EXTERN VALUE rb_cArray_empty_frozen;
  
  static inline VALUE rb_ary_entry_internal(VALUE ary, long offset);
  static inline bool ARY_PTR_USING_P(VALUE ary);
-static inline void RARY_TRANSIENT_SET(VALUE ary);
-static inline void RARY_TRANSIENT_UNSET(VALUE ary);
  
-MJIT_SYMBOL_EXPORT_BEGIN
  VALUE rb_ary_tmp_new_from_values(VALUE, long, const VALUE *);
  VALUE rb_check_to_array(VALUE ary);
  VALUE rb_ary_behead(VALUE, long);
@@ -49,14 +49,13 @@ VALUE rb_ary_aref1(VALUE ary, VALUE i);
  
  struct rb_execution_context_struct;
  VALUE rb_ec_ary_new_from_values(struct rb_execution_context_struct *ec, long n, const VALUE *elts);
-MJIT_SYMBOL_EXPORT_END
  
  // YJIT needs this function to never allocate and never raise
  static inline VALUE
  rb_ary_entry_internal(VALUE ary, long offset)
  {
      long len = RARRAY_LEN(ary);
-    const VALUE *ptr = RARRAY_CONST_PTR_TRANSIENT(ary);
+    const VALUE *ptr = RARRAY_CONST_PTR(ary);
      if (len == 0) return Qnil;
      if (offset < 0) {
          offset += len;
@@ -118,22 +117,6 @@ ARY_SHARED_ROOT_REFCNT(VALUE ary)
      return RARRAY(ary)->as.heap.aux.capa;
  }
  
-static inline void
-RARY_TRANSIENT_SET(VALUE ary)
-{
-#if USE_TRANSIENT_HEAP
-    FL_SET_RAW(ary, RARRAY_TRANSIENT_FLAG);
-#endif
-}
-
-static inline void
-RARY_TRANSIENT_UNSET(VALUE ary)
-{
-#if USE_TRANSIENT_HEAP
-    FL_UNSET_RAW(ary, RARRAY_TRANSIENT_FLAG);
-#endif
-}
-
  #undef rb_ary_new_from_args
  #if RBIMPL_HAS_WARNING("-Wgnu-zero-variadic-macro-arguments")
  # /* Skip it; clang -pedantic doesn't like the following */
@@ -154,9 +137,16 @@ RBIMPL_ATTR_ARTIFICIAL()
  static inline VALUE
  RARRAY_AREF(VALUE ary, long i)
  {
+    VALUE val;
      RBIMPL_ASSERT_TYPE(ary, RUBY_T_ARRAY);
  
-    return RARRAY_CONST_PTR_TRANSIENT(ary)[i];
+    RBIMPL_WARNING_PUSH();
+#if defined(__GNUC__) && !defined(__clang__) && __GNUC__ == 13
+    RBIMPL_WARNING_IGNORED(-Warray-bounds);
+#endif
+    val = RARRAY_CONST_PTR(ary)[i];
+    RBIMPL_WARNING_POP();
+    return val;
  }
  
  #endif /* INTERNAL_ARRAY_H */