Inline Doubles truncate and round.

runtime/vm/assembler_ia32_test.cc

 // Copyright (c) 2012, 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_IA32)
 
 #include "vm/assembler.h"
 #include "vm/os.h"
 #include "vm/unit_test.h"
@@ skipping 1251 matching lines @@
 
 ASSEMBLER_TEST_RUN(DoubleToIntConversionTrunc, entry) {
   typedef int (*DoubleToIntConversionTruncCode)(double d);
   int res = reinterpret_cast<DoubleToIntConversionTruncCode>(entry)(12.3);
   EXPECT_EQ(12, res);
   res = reinterpret_cast<DoubleToIntConversionTruncCode>(entry)(12.8);
   EXPECT_EQ(12, res);
 }
 
 
+ASSEMBLER_TEST_GENERATE(DoubleToDoubleTrunc, assembler) {
+  __ movsd(XMM3, Address(ESP, kWordSize));
+  __ roundsd(XMM2, XMM3, Assembler::kRoundToZero);
+  __ pushl(EAX);
+  __ pushl(EAX);
+  __ movsd(Address(ESP, 0), XMM2);
+  __ fldl(Address(ESP, 0));
+  __ popl(EAX);
+  __ popl(EAX);
+  __ ret();
+}
+
+
+ASSEMBLER_TEST_RUN(DoubleToDoubleTrunc, entry) {
+  typedef double (*DoubleToDoubleTruncCode)(double d);
+  double res = reinterpret_cast<DoubleToDoubleTruncCode>(entry)(12.3);
+  EXPECT_EQ(12.0, res);
+  res = reinterpret_cast<DoubleToDoubleTruncCode>(entry)(12.8);
+  EXPECT_EQ(12.0, res);
+  res = reinterpret_cast<DoubleToDoubleTruncCode>(entry)(-12.3);
+  EXPECT_EQ(-12.0, res);
+  res = reinterpret_cast<DoubleToDoubleTruncCode>(entry)(-12.8);
+  EXPECT_EQ(-12.0, res);
+}
+
+
+ASSEMBLER_TEST_GENERATE(DoubleToDoubleRound, assembler) {
+  __ movsd(XMM3, Address(ESP, kWordSize));
+  __ DoubleRound(XMM2, XMM3, XMM0);
+  __ pushl(EAX);
+  __ pushl(EAX);
+  __ movsd(Address(ESP, 0), XMM2);
+  __ fldl(Address(ESP, 0));
+  __ popl(EAX);
+  __ popl(EAX);
+  __ ret();
+}
+
+
+ASSEMBLER_TEST_RUN(DoubleToDoubleRound, entry) {
+  typedef double (*DoubleToDoubleRoundCode)(double d);
+  double res = reinterpret_cast<DoubleToDoubleRoundCode>(entry)(12.3);
+  EXPECT_EQ(12.0, res);
+  res = reinterpret_cast<DoubleToDoubleRoundCode>(entry)(12.8);
+  EXPECT_EQ(13.0, res);
+  res = reinterpret_cast<DoubleToDoubleRoundCode>(entry)(0.5);
+  EXPECT_EQ(1.0, res);
+  res = reinterpret_cast<DoubleToDoubleRoundCode>(entry)(-12.3);
+  EXPECT_EQ(-12.0, res);
+  res = reinterpret_cast<DoubleToDoubleRoundCode>(entry)(-12.8);
+  EXPECT_EQ(-13.0, res);
+  res = reinterpret_cast<DoubleToDoubleRoundCode>(entry)(-0.5);
+  EXPECT_EQ(-1.0, res);

[Florian Schneider, 2013/01/08 14:24:04]

Please also add the corner cases from the existing language tests here
(tests/co19/src/LibTest/core/double/round_A01_t01.dart)

[srdjan, 2013/01/10 22:35:52]

Added more tests, but mainly adapted test in tests/language.

+}
+
+
 static const double kDoubleConst = 3.226;
 
 ASSEMBLER_TEST_GENERATE(GlobalAddress, assembler) {
   __ movsd(XMM0, Address::Absolute(reinterpret_cast<uword>(&kDoubleConst)));
   __ pushl(EAX);
   __ pushl(EAX);
   __ movsd(Address(ESP, 0), XMM0);
   __ fldl(Address(ESP, 0));
   __ popl(EAX);
   __ popl(EAX);
@@ skipping 827 matching lines @@
                      EAX);
   __ popl(EAX);
   __ popl(CTX);
   __ ret();
 }
 
 
 }  // namespace dart
 
 #endif  // defined TARGET_ARCH_IA32