Inline Doubles truncate and round.

runtime/vm/assembler_ia32_test.cc

Index: runtime/vm/assembler_ia32_test.cc
===================================================================
--- runtime/vm/assembler_ia32_test.cc	(revision 16607)
+++ runtime/vm/assembler_ia32_test.cc	(working copy)
@@ -1269,6 +1269,62 @@
 }
 
 
+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) {