Reland "Add DoubleTestOp instruction"

runtime/vm/intermediate_language_mips.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_MIPS.
 #if defined(TARGET_ARCH_MIPS)
 
 #include "vm/intermediate_language.h"
 
 #include "vm/compiler.h"
@@ skipping 3674 matching lines @@
   switch (op_kind()) {
     case Token::kADD: __ addd(result, left, right); break;
     case Token::kSUB: __ subd(result, left, right); break;
     case Token::kMUL: __ muld(result, left, right); break;
     case Token::kDIV: __ divd(result, 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 DRegister value = locs()->in(0).fpu_reg();
+  const Register result = locs()->out(0).reg();
+  if (op_kind() == MethodRecognizer::kDouble_getIsNaN) {
+    Label is_not_nan;
+    __ LoadObject(result, Bool::False());
+    __ cund(value, value);
+    __ bc1f(&is_not_nan);
+    __ LoadObject(result, Bool::True());
+    __ Bind(&is_not_nan);
+  } else {
+    ASSERT(op_kind() == MethodRecognizer::kDouble_getIsInfinite);
+    Label not_inf, done;
+    __ mfc1(TMP, EvenFRegisterOf(value));
+    __ mfc1(result, OddFRegisterOf(value));
+    // If the low word isn't zero, then it isn't infinity.
+    __ bne(TMP, ZR, &not_inf);
+    // Mask off the sign bit.
+    __ AndImmediate(result, result, 0x7FFFFFFF);
+    // Compare with +infinity.
+    __ BranchNotEqual(result, Immediate(0x7FF00000), &not_inf);
+
+    __ LoadObject(result, Bool::True());
+    __ b(&done);
+
+    __ Bind(&not_inf);
+    __ LoadObject(result, Bool::False());
+    __ Bind(&done);
+  }
+}
+
+
 LocationSummary* BinaryFloat32x4OpInstr::MakeLocationSummary(Zone* zone,
                                                              bool opt) const {
   UNIMPLEMENTED();
   return NULL;
 }
 
 
 void BinaryFloat32x4OpInstr::EmitNativeCode(FlowGraphCompiler* compiler) {
   UNIMPLEMENTED();
 }
@@ skipping 824 matching lines @@
   Label try_sqrt;
   __ bc1f(&try_sqrt);  // Neither 'exp' nor 'base' are NaN.
 
   __ Bind(&return_nan);
   __ LoadImmediate(result, NAN);
   __ b(&skip_call);
 
   __ Bind(&try_sqrt);
   // Before calling pow, check if we could use sqrt instead of pow.
   __ LoadImmediate(result, kPosInfinity);
-  // base == -Infinity -> call pow;
+  // base == Infinity -> call pow;
   __ ceqd(base, result);
   Label do_pow;
-  __ b(&do_pow);
+  __ bc1t(&do_pow);
 
   // exponent == 0.5 ?
   __ LoadImmediate(result, 0.5);
   __ ceqd(base, result);
   __ bc1f(&do_pow);
 
   // base == 0 -> return 0;
   __ LoadImmediate(DTMP, 0.0);
   __ ceqd(base, DTMP);
   Label return_zero;
@@ skipping 1234 matching lines @@
                                 1,
                                 locs());
   __ lw(result, Address(SP, 1 * kWordSize));
   __ addiu(SP, SP, Immediate(2 * kWordSize));
 }
 
 
 }  // namespace dart
 
 #endif  // defined TARGET_ARCH_MIPS