Implement kDoubleToDouble and kIntegerToDouble on ia32 and x64.

runtime/vm/intermediate_language_ia32.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"  // Needed here to get TARGET_ARCH_IA32.
 #if defined(TARGET_ARCH_IA32)
 
 #include "vm/intermediate_language.h"
 
 #include "lib/error.h"
@@ skipping 1277 matching lines @@
     __ popl(temp);
     __ movsd(XMM0, FieldAddress(temp, Double::value_offset()));
     __ DoubleNegate(XMM0);
     __ movsd(FieldAddress(result, Double::value_offset()), XMM0);
   } else {
     UNREACHABLE();
   }
 }
 
 
+LocationSummary* ToDoubleComp::MakeLocationSummary() const {
+  const intptr_t kNumInputs = 1;
+  const intptr_t kNumTemps = 1;
+  if (from() == kDouble) {
+    LocationSummary* locs = new LocationSummary(kNumInputs, kNumTemps);
+    locs->set_in(0, Location::RequiresRegister());
+    locs->set_out(Location::SameAsFirstInput());
+    return locs;
+  } else {
+    ASSERT(from() == kSmi);
+    return LocationSummary::Make(kNumInputs, Location::RegisterLocation(EAX));
+  }
+}
+
+
+void ToDoubleComp::EmitNativeCode(FlowGraphCompiler* compiler) {
+  Register value = locs()->in(0).reg();
+  Register result = locs()->out().reg();
+
+  const DeoptReasonId deopt_reason = (from() == kDouble) ?
+      kDeoptDoubleToDouble : kDeoptIntegerToDouble;
+  Label* deopt = compiler->AddDeoptStub(instance_call()->cid(),
+                                        instance_call()->token_index(),
+                                        instance_call()->try_index(),
+                                        deopt_reason,
+                                        value,
+                                        kNoRegister);
+
+  if (from() == kDouble) {
+    Register temp = locs()->temp(0).reg();
+    __ testl(value, Immediate(kSmiTagMask));
+    __ j(ZERO, deopt);  // Deoptimize if Smi.
+    __ CompareClassId(value, kDouble, temp);
+    __ j(NOT_EQUAL, deopt);  // Deoptimize if not Double.
+    ASSERT(value == result);
+    return;
+  }
+
+  ASSERT(from() == kSmi);
+
+  // TODO(vegorov): allocate a single ZoneHandle in FlowGraphCompiler for
+  // double class.
+  const Class& double_class =
+      Class::ZoneHandle(Isolate::Current()->object_store()->double_class());
+
+  const Code& stub =
+    Code::Handle(StubCode::GetAllocationStubForClass(double_class));
+
+  const ExternalLabel label(double_class.ToCString(), stub.EntryPoint());
+
+  // TODO(vegorov): allocate box in the driver loop to avoid pushing and poping.
+  __ pushl(value);
+  compiler->GenerateCall(instance_call()->token_index(),
+                         instance_call()->try_index(),
+                         &label,
+                         PcDescriptors::kOther);
+  ASSERT(result == EAX);
+  __ popl(value);
+
+  __ testl(value, Immediate(kSmiTagMask));
+  __ j(NOT_ZERO, deopt);  // Deoptimize if not Smi.
+  __ SmiUntag(value);
+  __ cvtsi2sd(XMM0, value);
+  __ movsd(FieldAddress(result, Double::value_offset()), XMM0);
+}
+
+
 }  // namespace dart
 
 #undef __
 
 #endif  // defined TARGET_ARCH_X64