| OLD | NEW |
| 1 // Copyright (c) 2012, the Dart project authors. Please see the AUTHORS file | 1 // Copyright (c) 2012, the Dart project authors. Please see the AUTHORS file |
| 2 // for details. All rights reserved. Use of this source code is governed by a | 2 // for details. All rights reserved. Use of this source code is governed by a |
| 3 // BSD-style license that can be found in the LICENSE file. | 3 // BSD-style license that can be found in the LICENSE file. |
| 4 | 4 |
| 5 #include "vm/globals.h" // Needed here to get TARGET_ARCH_X64. | 5 #include "vm/globals.h" // Needed here to get TARGET_ARCH_X64. |
| 6 #if defined(TARGET_ARCH_X64) | 6 #if defined(TARGET_ARCH_X64) |
| 7 | 7 |
| 8 #include "vm/intrinsifier.h" | 8 #include "vm/intrinsifier.h" |
| 9 | 9 |
| 10 #include "vm/assembler.h" | 10 #include "vm/assembler.h" |
| (...skipping 967 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 978 case Token::kSUB: __ subsd(XMM0, XMM1); break; | 978 case Token::kSUB: __ subsd(XMM0, XMM1); break; |
| 979 case Token::kMUL: __ mulsd(XMM0, XMM1); break; | 979 case Token::kMUL: __ mulsd(XMM0, XMM1); break; |
| 980 case Token::kDIV: __ divsd(XMM0, XMM1); break; | 980 case Token::kDIV: __ divsd(XMM0, XMM1); break; |
| 981 default: UNREACHABLE(); | 981 default: UNREACHABLE(); |
| 982 } | 982 } |
| 983 const Class& double_class = Class::Handle( | 983 const Class& double_class = Class::Handle( |
| 984 Isolate::Current()->object_store()->double_class()); | 984 Isolate::Current()->object_store()->double_class()); |
| 985 AssemblerMacros::TryAllocate(assembler, | 985 AssemblerMacros::TryAllocate(assembler, |
| 986 double_class, | 986 double_class, |
| 987 &fall_through, | 987 &fall_through, |
| 988 Assembler::kNearJump, |
| 988 RAX); // Result register. | 989 RAX); // Result register. |
| 989 __ movsd(FieldAddress(RAX, Double::value_offset()), XMM0); | 990 __ movsd(FieldAddress(RAX, Double::value_offset()), XMM0); |
| 990 __ ret(); | 991 __ ret(); |
| 991 __ Bind(&fall_through); | 992 __ Bind(&fall_through); |
| 992 return false; | 993 return false; |
| 993 } | 994 } |
| 994 | 995 |
| 995 | 996 |
| 996 bool Intrinsifier::Double_add(Assembler* assembler) { | 997 bool Intrinsifier::Double_add(Assembler* assembler) { |
| 997 return DoubleArithmeticOperations(assembler, Token::kADD); | 998 return DoubleArithmeticOperations(assembler, Token::kADD); |
| (...skipping 25 matching lines...) Expand all Loading... |
| 1023 __ SmiUntag(RAX); | 1024 __ SmiUntag(RAX); |
| 1024 __ cvtsi2sd(XMM1, RAX); | 1025 __ cvtsi2sd(XMM1, RAX); |
| 1025 __ movq(RAX, Address(RSP, + 2 * kWordSize)); | 1026 __ movq(RAX, Address(RSP, + 2 * kWordSize)); |
| 1026 __ movsd(XMM0, FieldAddress(RAX, Double::value_offset())); | 1027 __ movsd(XMM0, FieldAddress(RAX, Double::value_offset())); |
| 1027 __ mulsd(XMM0, XMM1); | 1028 __ mulsd(XMM0, XMM1); |
| 1028 const Class& double_class = Class::Handle( | 1029 const Class& double_class = Class::Handle( |
| 1029 Isolate::Current()->object_store()->double_class()); | 1030 Isolate::Current()->object_store()->double_class()); |
| 1030 AssemblerMacros::TryAllocate(assembler, | 1031 AssemblerMacros::TryAllocate(assembler, |
| 1031 double_class, | 1032 double_class, |
| 1032 &fall_through, | 1033 &fall_through, |
| 1034 Assembler::kNearJump, |
| 1033 RAX); // Result register. | 1035 RAX); // Result register. |
| 1034 __ movsd(FieldAddress(RAX, Double::value_offset()), XMM0); | 1036 __ movsd(FieldAddress(RAX, Double::value_offset()), XMM0); |
| 1035 __ ret(); | 1037 __ ret(); |
| 1036 __ Bind(&fall_through); | 1038 __ Bind(&fall_through); |
| 1037 return false; | 1039 return false; |
| 1038 } | 1040 } |
| 1039 | 1041 |
| 1040 | 1042 |
| 1041 // Left is double right is integer (Bigint, Mint or Smi) | 1043 // Left is double right is integer (Bigint, Mint or Smi) |
| 1042 bool Intrinsifier::Double_fromInteger(Assembler* assembler) { | 1044 bool Intrinsifier::Double_fromInteger(Assembler* assembler) { |
| 1043 Label fall_through; | 1045 Label fall_through; |
| 1044 __ movq(RAX, Address(RSP, +1 * kWordSize)); | 1046 __ movq(RAX, Address(RSP, +1 * kWordSize)); |
| 1045 __ testq(RAX, Immediate(kSmiTagMask)); | 1047 __ testq(RAX, Immediate(kSmiTagMask)); |
| 1046 __ j(NOT_ZERO, &fall_through, Assembler::kNearJump); | 1048 __ j(NOT_ZERO, &fall_through, Assembler::kNearJump); |
| 1047 // Is Smi. | 1049 // Is Smi. |
| 1048 __ SmiUntag(RAX); | 1050 __ SmiUntag(RAX); |
| 1049 __ cvtsi2sd(XMM0, RAX); | 1051 __ cvtsi2sd(XMM0, RAX); |
| 1050 const Class& double_class = Class::Handle( | 1052 const Class& double_class = Class::Handle( |
| 1051 Isolate::Current()->object_store()->double_class()); | 1053 Isolate::Current()->object_store()->double_class()); |
| 1052 AssemblerMacros::TryAllocate(assembler, | 1054 AssemblerMacros::TryAllocate(assembler, |
| 1053 double_class, | 1055 double_class, |
| 1054 &fall_through, | 1056 &fall_through, |
| 1057 Assembler::kNearJump, |
| 1055 RAX); // Result register. | 1058 RAX); // Result register. |
| 1056 __ movsd(FieldAddress(RAX, Double::value_offset()), XMM0); | 1059 __ movsd(FieldAddress(RAX, Double::value_offset()), XMM0); |
| 1057 __ ret(); | 1060 __ ret(); |
| 1058 __ Bind(&fall_through); | 1061 __ Bind(&fall_through); |
| 1059 return false; | 1062 return false; |
| 1060 } | 1063 } |
| 1061 | 1064 |
| 1062 | 1065 |
| 1063 bool Intrinsifier::Double_isNaN(Assembler* assembler) { | 1066 bool Intrinsifier::Double_isNaN(Assembler* assembler) { |
| 1064 const Bool& bool_true = Bool::ZoneHandle(Bool::True()); | 1067 const Bool& bool_true = Bool::ZoneHandle(Bool::True()); |
| (...skipping 57 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 1122 case kCosine: __ fcos(); break; | 1125 case kCosine: __ fcos(); break; |
| 1123 default: | 1126 default: |
| 1124 UNREACHABLE(); | 1127 UNREACHABLE(); |
| 1125 } | 1128 } |
| 1126 const Class& double_class = Class::Handle( | 1129 const Class& double_class = Class::Handle( |
| 1127 Isolate::Current()->object_store()->double_class()); | 1130 Isolate::Current()->object_store()->double_class()); |
| 1128 Label alloc_failed; | 1131 Label alloc_failed; |
| 1129 AssemblerMacros::TryAllocate(assembler, | 1132 AssemblerMacros::TryAllocate(assembler, |
| 1130 double_class, | 1133 double_class, |
| 1131 &alloc_failed, | 1134 &alloc_failed, |
| 1135 Assembler::kNearJump, |
| 1132 RAX); // Result register. | 1136 RAX); // Result register. |
| 1133 __ fstpl(FieldAddress(RAX, Double::value_offset())); | 1137 __ fstpl(FieldAddress(RAX, Double::value_offset())); |
| 1134 __ ret(); | 1138 __ ret(); |
| 1135 | 1139 |
| 1136 __ Bind(&is_smi); // smi -> double. | 1140 __ Bind(&is_smi); // smi -> double. |
| 1137 __ SmiUntag(RAX); | 1141 __ SmiUntag(RAX); |
| 1138 __ pushq(RAX); | 1142 __ pushq(RAX); |
| 1139 __ fildl(Address(RSP, 0)); | 1143 __ fildl(Address(RSP, 0)); |
| 1140 __ popq(RAX); | 1144 __ popq(RAX); |
| 1141 __ jmp(&double_op); | 1145 __ jmp(&double_op); |
| (...skipping 11 matching lines...) Expand all Loading... |
| 1153 TestLastArgumentIsDouble(assembler, &is_smi, &fall_through); | 1157 TestLastArgumentIsDouble(assembler, &is_smi, &fall_through); |
| 1154 // Argument is double and is in RAX. | 1158 // Argument is double and is in RAX. |
| 1155 __ movsd(XMM1, FieldAddress(RAX, Double::value_offset())); | 1159 __ movsd(XMM1, FieldAddress(RAX, Double::value_offset())); |
| 1156 __ Bind(&double_op); | 1160 __ Bind(&double_op); |
| 1157 __ sqrtsd(XMM0, XMM1); | 1161 __ sqrtsd(XMM0, XMM1); |
| 1158 const Class& double_class = Class::Handle( | 1162 const Class& double_class = Class::Handle( |
| 1159 Isolate::Current()->object_store()->double_class()); | 1163 Isolate::Current()->object_store()->double_class()); |
| 1160 AssemblerMacros::TryAllocate(assembler, | 1164 AssemblerMacros::TryAllocate(assembler, |
| 1161 double_class, | 1165 double_class, |
| 1162 &fall_through, | 1166 &fall_through, |
| 1167 Assembler::kNearJump, |
| 1163 RAX); // Result register. | 1168 RAX); // Result register. |
| 1164 __ movsd(FieldAddress(RAX, Double::value_offset()), XMM0); | 1169 __ movsd(FieldAddress(RAX, Double::value_offset()), XMM0); |
| 1165 __ ret(); | 1170 __ ret(); |
| 1166 __ Bind(&is_smi); | 1171 __ Bind(&is_smi); |
| 1167 __ SmiUntag(RAX); | 1172 __ SmiUntag(RAX); |
| 1168 __ cvtsi2sd(XMM1, RAX); | 1173 __ cvtsi2sd(XMM1, RAX); |
| 1169 __ jmp(&double_op); | 1174 __ jmp(&double_op); |
| 1170 __ Bind(&fall_through); | 1175 __ Bind(&fall_through); |
| 1171 return false; | 1176 return false; |
| 1172 } | 1177 } |
| (...skipping 178 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 1351 __ LoadObject(RAX, bool_true); | 1356 __ LoadObject(RAX, bool_true); |
| 1352 __ ret(); | 1357 __ ret(); |
| 1353 return true; | 1358 return true; |
| 1354 } | 1359 } |
| 1355 | 1360 |
| 1356 #undef __ | 1361 #undef __ |
| 1357 | 1362 |
| 1358 } // namespace dart | 1363 } // namespace dart |
| 1359 | 1364 |
| 1360 #endif // defined TARGET_ARCH_X64 | 1365 #endif // defined TARGET_ARCH_X64 |
| OLD | NEW |