Implements intrinsics for 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/os.h"
 #include "vm/unit_test.h"
@@ skipping 207 matching lines @@
 
 
 ASSEMBLER_TEST_RUN(DoubleFPOperations, test) {
   EXPECT(test != NULL);
   typedef double (*DoubleFPOperations)();
   double res = EXECUTE_TEST_CODE_DOUBLE(DoubleFPOperations, test->entry());
   EXPECT_FLOAT_EQ(3.8340579, res, 0.001);
 }
 
 
+ASSEMBLER_TEST_GENERATE(DoubleSqrtNeg, assembler) {
+  // Check that sqrt of a negative double gives NaN.
+  __ LoadDImmediate(D1, -1.0, R0);
+  __ vsqrtd(D0, D1);
+  __ vcmpd(D0, D0);
+  __ vmstat();
+  __ mov(R0, ShifterOperand(1), VS);
+  __ eor(R0, R0, ShifterOperand(R0), VC);

[regis, 2013/05/28 22:01:44]

mov(R0, ShifterOperand(0), VC) may be clearer than eor.

[zra, 2013/05/28 22:49:31]

Done.

+  __ Ret();
+}
+
+
+ASSEMBLER_TEST_RUN(DoubleSqrtNeg, test) {
+  EXPECT(test != NULL);
+  typedef double (*DoubleFPOperations)();
+  EXPECT_EQ(1, EXECUTE_TEST_CODE_INT32(DoubleFPOperations, test->entry()));
+}
+
+
 ASSEMBLER_TEST_GENERATE(IntToDoubleConversion, assembler) {
   __ mov(R3, ShifterOperand(6));
   __ vmovsr(S3, R3);
   __ vcvtdi(D1, S3);
   __ vmovrrd(R0, R1, D1);
   __ mov(PC, ShifterOperand(LR));
 }
 
 
 ASSEMBLER_TEST_RUN(IntToDoubleConversion, test) {
@@ skipping 405 matching lines @@
 
 
 ASSEMBLER_TEST_RUN(Multiply32To64, test) {
   EXPECT(test != NULL);
   typedef int64_t (*Multiply32To64)(int64_t operand0, int64_t operand1);
   EXPECT_EQ(6,
             EXECUTE_TEST_CODE_INT64_LL(Multiply32To64, test->entry(), -3, -2));
 }
 
 
+ASSEMBLER_TEST_GENERATE(MultiplyAccum32To64, assembler) {
+  __ smlal(R0, R1, R0, R2);
+  __ mov(PC, ShifterOperand(LR));
+}
+
+
+ASSEMBLER_TEST_RUN(MultiplyAccum32To64, test) {
+  EXPECT(test != NULL);
+  typedef int64_t (*Multiply32To64)(int64_t operand0, int64_t operand1);
+  EXPECT_EQ(3,
+            EXECUTE_TEST_CODE_INT64_LL(Multiply32To64, test->entry(), -3, -2));
+}
+
+
 ASSEMBLER_TEST_GENERATE(Clz, assembler) {
   Label error;
 
   __ mov(R0, ShifterOperand(0));
   __ clz(R1, R0);
   __ cmp(R1, ShifterOperand(32));
   __ b(&error, NE);
   __ mov(R2, ShifterOperand(42));
   __ clz(R2, R2);
   __ cmp(R2, ShifterOperand(26));
@@ skipping 934 matching lines @@
   __ StoreIntoObject(R2,
                      FieldAddress(R2, GrowableObjectArray::data_offset()),
                      R1);
   __ PopList((1 << CTX) | (1 << LR));
   __ Ret();
 }
 
 }  // namespace dart
 
 #endif  // defined TARGET_ARCH_ARM