Reland "Add DoubleTestOp instruction"

runtime/vm/intermediate_language_ia32.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"  // Needed here to get TARGET_ARCH_IA32.
 #if defined(TARGET_ARCH_IA32)
 
 #include "vm/intermediate_language.h"
 
 #include "vm/compiler.h"
@@ skipping 3881 matching lines @@
   switch (op_kind()) {
     case Token::kADD: __ addsd(left, right); break;
     case Token::kSUB: __ subsd(left, right); break;
     case Token::kMUL: __ mulsd(left, right); break;
     case Token::kDIV: __ divsd(left, right); break;
     default: UNREACHABLE();
   }
 }
 
 
+LocationSummary* DoubleTestOpInstr::MakeLocationSummary(Zone* zone,
+                                                        bool opt) const {
+  const intptr_t kNumInputs = 1;
+  const intptr_t kNumTemps = 0;
+  LocationSummary* summary = new(zone) LocationSummary(
+      zone, kNumInputs, kNumTemps, LocationSummary::kNoCall);
+  summary->set_in(0, Location::RequiresFpuRegister());
+  summary->set_out(0, Location::RequiresRegister());
+  return summary;
+}
+
+
+void DoubleTestOpInstr::EmitNativeCode(FlowGraphCompiler* compiler) {
+  ASSERT(compiler->is_optimizing());
+  const XmmRegister value = locs()->in(0).fpu_reg();
+  const Register result = locs()->out(0).reg();
+  if (op_kind() == MethodRecognizer::kDouble_getIsNaN) {
+    Label is_nan;
+    __ LoadObject(result, Bool::True());
+    __ comisd(value, value);
+    __ j(PARITY_EVEN, &is_nan, Assembler::kNearJump);
+    __ LoadObject(result, Bool::False());
+    __ Bind(&is_nan);
+  } else {
+    ASSERT(op_kind() == MethodRecognizer::kDouble_getIsInfinite);
+    Label not_inf, done;
+    __ AddImmediate(ESP, Immediate(-kDoubleSize));
+    __ movsd(Address(ESP, 0), value);
+    __ movl(result, Address(ESP, 0));
+    // If the low word isn't zero, then it isn't infinity.
+    __ cmpl(result, Immediate(0));
+    __ j(NOT_EQUAL, &not_inf, Assembler::kNearJump);
+    // Check the high word.
+    __ movl(result, Address(ESP, kWordSize));
+    // Mask off sign bit.
+    __ andl(result, Immediate(0x7FFFFFFF));
+    // Compare with +infinity.
+    __ cmpl(result, Immediate(0x7FF00000));
+    __ j(NOT_EQUAL, &not_inf, Assembler::kNearJump);
+    __ LoadObject(result, Bool::True());
+    __ jmp(&done);
+
+    __ Bind(&not_inf);
+    __ LoadObject(result, Bool::False());
+    __ Bind(&done);
+    __ AddImmediate(ESP, Immediate(kDoubleSize));
+  }
+}
+
+
 LocationSummary* BinaryFloat32x4OpInstr::MakeLocationSummary(Zone* zone,
                                                              bool opt) const {
   const intptr_t kNumInputs = 2;
   const intptr_t kNumTemps = 0;
   LocationSummary* summary = new(zone) LocationSummary(
       zone, kNumInputs, kNumTemps, LocationSummary::kNoCall);
   summary->set_in(0, Location::RequiresFpuRegister());
   summary->set_in(1, Location::RequiresFpuRegister());
   summary->set_out(0, Location::SameAsFirstInput());
   return summary;
@@ skipping 2970 matching lines @@
   __ Drop(1);
   __ popl(result);
 }
 
 
 }  // namespace dart
 
 #undef __
 
 #endif  // defined TARGET_ARCH_IA32