VM: Optimized context allocation on all platforms.

runtime/vm/assembler_mips.cc

 // Copyright (c) 2013, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 #include "vm/globals.h"
 #if defined(TARGET_ARCH_MIPS)
 
 #include "vm/assembler.h"
 #include "vm/longjump.h"
 #include "vm/runtime_entry.h"
@@ skipping 869 matching lines @@
     ASSERT(cls.id() != kIllegalCid);
     tags = RawObject::ClassIdTag::update(cls.id(), tags);
     LoadImmediate(TMP, tags);
     sw(TMP, FieldAddress(instance_reg, Object::tags_offset()));
   } else {
     b(failure);
   }
 }
 
 
+void Assembler::TryAllocateArray(intptr_t cid,
+                                 intptr_t instance_size,
+                                 Label* failure,
+                                 Register instance,
+                                 Register end_address,
+                                 Register temp1,
+                                 Register temp2) {

[srdjan, 2014/08/11 21:42:34]

Guard with FLAG_inline_alloc.

[Florian Schneider, 2014/08/13 14:56:12]

Done.

+  Isolate* isolate = Isolate::Current();
+  Heap* heap = isolate->heap();
+
+  LoadImmediate(temp1, heap->TopAddress());
+  lw(instance, Address(temp1, 0));  // Potential new object start.
+  // Potential next object start.
+  AddImmediateDetectOverflow(end_address, instance, instance_size, CMPRES1);
+  bltz(CMPRES1, failure);  // CMPRES1 < 0 on overflow.
+
+  // Check if the allocation fits into the remaining space.
+  // instance: potential new object start.
+  // end_address: potential next object start.
+  LoadImmediate(temp2, heap->EndAddress());
+  lw(temp2, Address(temp2, 0));
+  BranchUnsignedGreaterEqual(end_address, temp2, failure);
+
+
+  // Successfully allocated the object(s), now update top to point to
+  // next object start and initialize the object.
+  sw(end_address, Address(temp1, 0));
+  addiu(instance, instance, Immediate(kHeapObjectTag));
+  LoadImmediate(temp1, instance_size);
+  UpdateAllocationStatsWithSize(cid, temp1, temp2);
+
+  // Initialize the tags.
+  // instance: new object start as a tagged pointer.
+  uword tags = 0;
+  tags = RawObject::ClassIdTag::update(cid, tags);
+  tags = RawObject::SizeTag::update(instance_size, tags);
+  LoadImmediate(temp1, tags);
+  sw(temp1, FieldAddress(instance, Array::tags_offset()));  // Store tags.
+}
+
+
 void Assembler::CallRuntime(const RuntimeEntry& entry,
                             intptr_t argument_count) {
   entry.Call(this, argument_count);
 }
 
 
 void Assembler::EnterDartFrame(intptr_t frame_size) {
   ASSERT(!in_delay_slot_);
   const intptr_t offset = CodeSize();
 
@@ skipping 283 matching lines @@
     Emit(reinterpret_cast<int32_t>(message));
     Bind(&msg);
     break_(Instr::kMsgMessageCode);
   }
 #endif
 }
 
 }  // namespace dart
 
 #endif  // defined TARGET_ARCH_MIPS