Optimize testing for an index's existence in packed Arrays

src/arm64/full-codegen-arm64.cc

 // Copyright 2013 the V8 project authors. All rights reserved.
 // Use of this source code is governed by a BSD-style license that can be
 // found in the LICENSE file.
 
 #include "src/v8.h"
 
 #if V8_TARGET_ARCH_ARM64
 
 #include "src/code-factory.h"
 #include "src/code-stubs.h"
@@ skipping 4049 matching lines @@
   DCHECK(expr->arguments()->length() == 0);
   ExternalReference debug_is_active =
       ExternalReference::debug_is_active_address(isolate());
   __ Mov(x10, debug_is_active);
   __ Ldrb(x0, MemOperand(x10));
   __ SmiTag(x0);
   context()->Plug(x0);
 }
 
 
+void FullCodeGenerator::EmitHasFastPackedElements(CallRuntime* expr) {
+  ZoneList<Expression*>* args = expr->arguments();
+  DCHECK(args->length() == 1);
+
+  VisitForAccumulatorValue(args->at(0));
+
+  Label materialize_true, materialize_false;
+  Label* if_true = NULL;
+  Label* if_false = NULL;
+  Label* fall_through = NULL;
+  context()->PrepareTest(&materialize_true, &materialize_false, &if_true,
+                         &if_false, &fall_through);
+
+  Register object = x0;
+  Register map = x10;
+  Register elements_kind = x11;
+
+  __ JumpIfSmi(object, if_false);
+  __ Ldr(map, FieldMemOperand(object, HeapObject::kMapOffset));
+  __ Ldrb(elements_kind, FieldMemOperand(map, Map::kBitField2Offset));
+  __ Lsr(elements_kind, elements_kind, Map::ElementsKindBits::kShift);
+  __ Cmp(elements_kind, Operand(FAST_SMI_ELEMENTS));
+  __ B(eq, if_true);
+  __ Cmp(elements_kind, Operand(FAST_ELEMENTS));
+  __ B(eq, if_true);
+  __ Cmp(elements_kind, Operand(FAST_DOUBLE_ELEMENTS));
+  PrepareForBailoutBeforeSplit(expr, true, if_true, if_false);
+  Split(eq, if_true, if_false, fall_through);
+
+  context()->Plug(if_true, if_false);
+}
+
+
 void FullCodeGenerator::VisitCallRuntime(CallRuntime* expr) {
   if (expr->function() != NULL &&
       expr->function()->intrinsic_type == Runtime::INLINE) {
     Comment cmnt(masm_, "[ InlineRuntimeCall");
     EmitInlineRuntimeCall(expr);
     return;
   }
 
   Comment cmnt(masm_, "[ CallRunTime");
   ZoneList<Expression*>* args = expr->arguments();
@@ skipping 1198 matching lines @@
   return previous_;
 }
 
 
 #undef __
 
 
 } }  // namespace v8::internal
 
 #endif  // V8_TARGET_ARCH_ARM64