Implement bigint mulAdd and sqrAdd intrinsics on ARM.

runtime/vm/assembler_arm_test.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_ARM)
 
 #include "vm/assembler.h"
 #include "vm/cpu.h"
 #include "vm/os.h"
@@ skipping 902 matching lines @@
   if (TargetCPUFeatures::arm_version() == ARMv7) {
     __ Push(R4);
     __ mov(IP, Operand(R0));
     __ mul(R4, R2, R1);
     __ umull(R0, R1, R2, IP);
     __ mla(R2, IP, R3, R4);
     __ add(R1, R2, Operand(R1));
     __ Pop(R4);
   } else {
     __ LoadImmediate(R0, 6);
+    __ LoadImmediate(R1, 0);
   }
   __ bx(LR);
 #if defined(USING_SIMULATOR)
   HostCPUFeatures::set_arm_version(version);
 #endif
 }
 
 
 ASSEMBLER_TEST_RUN(Multiply64To64, test) {
   EXPECT(test != NULL);
   typedef int64_t (*Multiply64To64)
       (int64_t operand0, int64_t operand1) DART_UNUSED;
   EXPECT_EQ(6,
             EXECUTE_TEST_CODE_INT64_LL(Multiply64To64, test->entry(), -3, -2));
 }
 
 
 ASSEMBLER_TEST_GENERATE(Multiply32To64, assembler) {
 #if defined(USING_SIMULATOR)
   const ARMVersion version = TargetCPUFeatures::arm_version();
   HostCPUFeatures::set_arm_version(ARMv7);
 #endif
   if (TargetCPUFeatures::arm_version() == ARMv7) {
     __ smull(R0, R1, R0, R2);
   } else {
     __ LoadImmediate(R0, 6);
+    __ LoadImmediate(R1, 0);
   }
   __ bx(LR);
 #if defined(USING_SIMULATOR)
   HostCPUFeatures::set_arm_version(version);
 #endif
 }
 
 
 ASSEMBLER_TEST_RUN(Multiply32To64, test) {
   EXPECT(test != NULL);
   typedef int64_t (*Multiply32To64)
       (int64_t operand0, int64_t operand1) DART_UNUSED;
   EXPECT_EQ(6,
             EXECUTE_TEST_CODE_INT64_LL(Multiply32To64, test->entry(), -3, -2));
 }
 
 
 ASSEMBLER_TEST_GENERATE(MultiplyAccum32To64, assembler) {
 #if defined(USING_SIMULATOR)
   const ARMVersion version = TargetCPUFeatures::arm_version();
   HostCPUFeatures::set_arm_version(ARMv7);
 #endif
   if (TargetCPUFeatures::arm_version() == ARMv7) {
     __ smlal(R0, R1, R0, R2);
   } else {
     __ LoadImmediate(R0, 3);
+    __ LoadImmediate(R1, 0);
   }
   __ bx(LR);
 #if defined(USING_SIMULATOR)
   HostCPUFeatures::set_arm_version(version);
 #endif
 }
 
 
 ASSEMBLER_TEST_RUN(MultiplyAccum32To64, test) {
   EXPECT(test != NULL);
-  typedef int64_t (*Multiply32To64)
+  typedef int64_t (*MultiplyAccum32To64)
       (int64_t operand0, int64_t operand1) DART_UNUSED;
-  EXPECT_EQ(3,
-            EXECUTE_TEST_CODE_INT64_LL(Multiply32To64, test->entry(), -3, -2));
+  EXPECT_EQ(3, EXECUTE_TEST_CODE_INT64_LL(MultiplyAccum32To64, test->entry(),
+                                          -3, -2));
+}
+
+
+ASSEMBLER_TEST_GENERATE(MultiplyAccumAccum32To64, assembler) {
+#if defined(USING_SIMULATOR)
+  const ARMVersion version = TargetCPUFeatures::arm_version();
+  HostCPUFeatures::set_arm_version(ARMv7);
+#endif
+  if (TargetCPUFeatures::arm_version() == ARMv7) {
+    __ umaal(R0, R1, R2, R3);
+  } else {
+    __ LoadImmediate(R0, 3 + 7 + 5 * 11);
+    __ LoadImmediate(R1, 0);
+  }
+  __ bx(LR);
+#if defined(USING_SIMULATOR)
+  HostCPUFeatures::set_arm_version(version);
+#endif
+}
+
+
+ASSEMBLER_TEST_RUN(MultiplyAccumAccum32To64, test) {
+  EXPECT(test != NULL);
+  typedef int64_t (*MultiplyAccumAccum32To64)
+      (int64_t operand0, int64_t operand1) DART_UNUSED;
+  EXPECT_EQ((3LL << 32) + 7 + 5 * 11,
+            EXECUTE_TEST_CODE_INT64_LL(MultiplyAccumAccum32To64, test->entry(),
+                                       (3LL << 32) + 7, (5LL << 32) + 11));
 }
 
 
 ASSEMBLER_TEST_GENERATE(Clz, assembler) {
   Label error;
 
   __ mov(R0, Operand(0));
   __ clz(R1, R0);
   __ cmp(R1, Operand(32));
   __ b(&error, NE);
@@ skipping 3181 matching lines @@
   __ StoreIntoObject(R2,
                      FieldAddress(R2, GrowableObjectArray::data_offset()),
                      R1);
   __ PopList((1 << CTX) | (1 << LR));
   __ Ret();
 }
 
 }  // namespace dart
 
 #endif  // defined TARGET_ARCH_ARM