Inline Doubles truncate and round.

runtime/vm/assembler_x64.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_X64)
 
 #include "vm/assembler.h"
 #include "vm/heap.h"
 #include "vm/memory_region.h"
@@ skipping 623 matching lines @@
   ASSERT(src <= XMM15);
   AssemblerBuffer::EnsureCapacity ensured(&buffer_);
   EmitUint8(0x66);
   EmitREX_RB(dst, src);
   EmitUint8(0x0F);
   EmitUint8(0x57);
   EmitXmmRegisterOperand(dst & 7, src);
 }
 
 
+void Assembler::andpd(XmmRegister dst, const Address& src) {
+  ASSERT(dst <= XMM15);
+  AssemblerBuffer::EnsureCapacity ensured(&buffer_);
+  EmitUint8(0x66);
+  EmitOperandREX(dst, src, REX_NONE);
+  EmitUint8(0x0F);
+  EmitUint8(0x54);
+  EmitOperand(dst & 7, src);
+}
+
+
 void Assembler::cvtsi2sd(XmmRegister dst, Register src) {
   AssemblerBuffer::EnsureCapacity ensured(&buffer_);
   ASSERT(dst <= XMM15);
   Operand operand(src);
   EmitUint8(0xF2);
   EmitOperandREX(dst, operand, REX_W);
   EmitUint8(0x0F);
   EmitUint8(0x2A);
   EmitOperand(dst & 7, operand);
 }
@@ skipping 28 matching lines @@
   ASSERT(dst <= XMM15);
   AssemblerBuffer::EnsureCapacity ensured(&buffer_);
   EmitUint8(0xF2);
   EmitREX_RB(dst, src);
   EmitUint8(0x0F);
   EmitUint8(0x5A);
   EmitXmmRegisterOperand(dst & 7, src);
 }
 
 
+void Assembler::pxor(XmmRegister dst, XmmRegister src) {
+  ASSERT(src <= XMM15);
+  ASSERT(dst <= XMM15);
+  AssemblerBuffer::EnsureCapacity ensured(&buffer_);
+  EmitUint8(0x66);
+  EmitREX_RB(dst, src);
+  EmitUint8(0x0F);
+  EmitUint8(0xEF);
+  EmitXmmRegisterOperand(dst, src);
+}
+
+
+void Assembler::roundsd(XmmRegister dst, XmmRegister src, RoundingMode mode) {
+  ASSERT(src <= XMM15);
+  ASSERT(dst <= XMM15);
+  AssemblerBuffer::EnsureCapacity ensured(&buffer_);
+  EmitUint8(0x66);
+  EmitREX_RB(dst, src);
+  EmitUint8(0x0F);
+  EmitUint8(0x3A);
+  EmitUint8(0x0B);
+  EmitXmmRegisterOperand(dst, src);
+  // Mask precision exeption.
+  EmitUint8(static_cast<uint8_t>(mode) | 0x8);
+}
+
+
 void Assembler::fldl(const Address& src) {
   AssemblerBuffer::EnsureCapacity ensured(&buffer_);
   EmitUint8(0xDD);
   EmitOperand(0, src);
 }
 
 
 void Assembler::fstpl(const Address& dst) {
   AssemblerBuffer::EnsureCapacity ensured(&buffer_);
   EmitUint8(0xDD);
@@ skipping 1045 matching lines @@
   static const struct ALIGN16 {
     uint64_t a;
     uint64_t b;
   } double_negate_constant =
       {0x8000000000000000LL, 0x8000000000000000LL};
   movq(TMP, Immediate(reinterpret_cast<intptr_t>(&double_negate_constant)));
   xorpd(d, Address(TMP, 0));
 }
 
 
+void Assembler::DoubleAbs(XmmRegister reg) {
+  static const struct ALIGN16 {
+    uint64_t a;
+    uint64_t b;
+  } double_abs_constant =
+      {0x7FFFFFFFFFFFFFFFLL, 0x7FFFFFFFFFFFFFFFLL};
+  movq(TMP, Immediate(reinterpret_cast<intptr_t>(&double_abs_constant)));
+  andpd(reg, Address(TMP, 0));
+}
+
+
+void Assembler::DoubleRound(XmmRegister dst, XmmRegister src, XmmRegister tmp) {
+  ASSERT(tmp != src);
+  static double kZeroFiveConst = 0.5;
+  static double kNegZeroFiveConst = -0.5;
+  Label is_negative, round;
+  if (src != dst) {
+    movsd(dst, src);
+  }
+  Label below_half, below_equal_neg_half, done;
+  movq(TMP, Immediate(reinterpret_cast<intptr_t>(&kZeroFiveConst)));
+  movsd(tmp, Address(TMP, 0));
+  comisd(tmp, dst);
+  // 0.5 > dst ?

[Florian Schneider, 2013/01/11 09:49:30]

Same comments as on ia32.

[srdjan, 2013/01/11 19:41:08]

Done.

+  j(ABOVE, &below_half, Assembler::kNearJump);
+  // floor(val + 0.5).
+  addsd(dst, tmp);
+  roundsd(dst, dst, Assembler::kRoundDown);
+  jmp(&done, Assembler::kNearJump);
+  Bind(&below_half);
+  // Return -0.0 for -0.5.
+  movq(TMP, Immediate(reinterpret_cast<intptr_t>(&kNegZeroFiveConst)));
+  movsd(tmp, Address(TMP, 0));
+  comisd(tmp, dst);
+  // -0.5 >= dst.
+  j(ABOVE_EQUAL, &below_equal_neg_half, Assembler::kNearJump);
+  roundsd(dst, dst, Assembler::kRoundToZero);
+  jmp(&done, Assembler::kNearJump);
+  Bind(&below_equal_neg_half);
+  addsd(dst, tmp);
+  roundsd(dst, dst, Assembler::kRoundUp);
+  Bind(&done);
+}
+
+
 void Assembler::Stop(const char* message) {
   int64_t message_address = reinterpret_cast<int64_t>(message);
   if (FLAG_print_stop_message) {
     pushq(TMP);  // Preserve TMP register.
     pushq(RDI);  // Preserve RDI register.
     movq(RDI, Immediate(message_address));
     call(&StubCode::PrintStopMessageLabel());
     popq(RDI);  // Restore RDI register.
     popq(TMP);  // Restore TMP register.
   } else {
@@ skipping 338 matching lines @@
 
 const char* Assembler::XmmRegisterName(XmmRegister reg) {
   ASSERT((0 <= reg) && (reg < kNumberOfXmmRegisters));
   return xmm_reg_names[reg];
 }
 
 
 }  // namespace dart
 
 #endif  // defined TARGET_ARCH_X64