[WIP] Initial CallFunctionCallback builtin.

src/arm/macro-assembler-arm.cc

 // Copyright 2012 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 <limits.h>  // For LONG_MIN, LONG_MAX.
 
 #if V8_TARGET_ARCH_ARM
 
 #include "src/assembler-inl.h"
 #include "src/base/bits.h"
@@ skipping 2804 matching lines @@
     AssertNotSmi(object);
     CompareRoot(object, Heap::kUndefinedValueRootIndex);
     b(eq, &done_checking);
     ldr(scratch, FieldMemOperand(object, HeapObject::kMapOffset));
     CompareRoot(scratch, Heap::kAllocationSiteMapRootIndex);
     Assert(eq, kExpectedUndefinedOrCell);
     bind(&done_checking);
   }
 }
 
+void MacroAssembler::AssertApiCallResult(Register object) {
+  if (emit_debug_code()) {
+    Label done_checking;
+    Push(object);
+
+    // Check for Smis.
+    JumpIfSmi(object, &done_checking);
+
+    // Check for valid Oddballs.
+    JumpIfRoot(object, Heap::kTrueValueRootIndex, &done_checking);
+    JumpIfRoot(object, Heap::kFalseValueRootIndex, &done_checking);
+    JumpIfRoot(object, Heap::kNullValueRootIndex, &done_checking);
+    JumpIfRoot(object, Heap::kUndefinedValueRootIndex, &done_checking);
+
+    // Check for other primitives (String, Symbol and HeapNumber).
+    STATIC_ASSERT(LAST_PRIMITIVE_TYPE == ODDBALL_TYPE);
+    CompareObjectType(object, object, object, LAST_PRIMITIVE_TYPE);
+    b(lo, &done_checking);
+
+    // Check for JSReceivers.
+    cmp(object, Operand(FIRST_JS_RECEIVER_TYPE));
+    Check(hs, kAPICallReturnedInvalidObject);
+
+    bind(&done_checking);
+    Pop(object);
+  }
+}
 
 void MacroAssembler::AssertIsRoot(Register reg, Heap::RootListIndex index) {
   if (emit_debug_code()) {
     CompareRoot(reg, index);
     Check(eq, kHeapNumberMapRegisterClobbered);
   }
 }
 
 
 void MacroAssembler::JumpIfNotHeapNumber(Register object,
@@ skipping 842 matching lines @@
     }
   }
   if (mag.shift > 0) mov(result, Operand(result, ASR, mag.shift));
   add(result, result, Operand(dividend, LSR, 31));
 }
 
 }  // namespace internal
 }  // namespace v8
 
 #endif  // V8_TARGET_ARCH_ARM