| OLD | NEW |
| 1 // Copyright (c) 2013, the Dart project authors. Please see the AUTHORS file | 1 // Copyright (c) 2013, 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 705 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 716 __ xorq(RAX, RCX); | 716 __ xorq(RAX, RCX); |
| 717 // BSR does not write the destination register if source is zero. Put a 1 in | 717 // BSR does not write the destination register if source is zero. Put a 1 in |
| 718 // the Smi tag bit to ensure BSR writes to destination register. | 718 // the Smi tag bit to ensure BSR writes to destination register. |
| 719 __ orq(RAX, Immediate(kSmiTagMask)); | 719 __ orq(RAX, Immediate(kSmiTagMask)); |
| 720 __ bsrq(RAX, RAX); | 720 __ bsrq(RAX, RAX); |
| 721 __ SmiTag(RAX); | 721 __ SmiTag(RAX); |
| 722 __ ret(); | 722 __ ret(); |
| 723 } | 723 } |
| 724 | 724 |
| 725 | 725 |
| 726 void Intrinsifier::Bigint_setNeg(Assembler* assembler) { | |
| 727 __ movq(RAX, Address(RSP, + 1 * kWordSize)); | |
| 728 __ movq(RCX, Address(RSP, + 2 * kWordSize)); | |
| 729 __ StoreIntoObject(RCX, FieldAddress(RCX, Bigint::neg_offset()), RAX, false); | |
| 730 __ ret(); | |
| 731 } | |
| 732 | |
| 733 | |
| 734 void Intrinsifier::Bigint_setUsed(Assembler* assembler) { | |
| 735 __ movq(RAX, Address(RSP, + 1 * kWordSize)); | |
| 736 __ movq(RCX, Address(RSP, + 2 * kWordSize)); | |
| 737 __ StoreIntoObject(RCX, FieldAddress(RCX, Bigint::used_offset()), RAX); | |
| 738 __ ret(); | |
| 739 } | |
| 740 | |
| 741 | |
| 742 void Intrinsifier::Bigint_setDigits(Assembler* assembler) { | |
| 743 __ movq(RAX, Address(RSP, + 1 * kWordSize)); | |
| 744 __ movq(RCX, Address(RSP, + 2 * kWordSize)); | |
| 745 __ StoreIntoObject(RCX, | |
| 746 FieldAddress(RCX, Bigint::digits_offset()), RAX, false); | |
| 747 __ ret(); | |
| 748 } | |
| 749 | |
| 750 | |
| 751 void Intrinsifier::Bigint_absAdd(Assembler* assembler) { | 726 void Intrinsifier::Bigint_absAdd(Assembler* assembler) { |
| 752 // static void _absAdd(Uint32List digits, int used, | 727 // static void _absAdd(Uint32List digits, int used, |
| 753 // Uint32List a_digits, int a_used, | 728 // Uint32List a_digits, int a_used, |
| 754 // Uint32List r_digits) | 729 // Uint32List r_digits) |
| 755 | 730 |
| 756 __ movq(RDI, Address(RSP, 5 * kWordSize)); // digits | 731 __ movq(RDI, Address(RSP, 5 * kWordSize)); // digits |
| 757 __ movq(R8, Address(RSP, 4 * kWordSize)); // used is Smi | 732 __ movq(R8, Address(RSP, 4 * kWordSize)); // used is Smi |
| 758 __ addq(R8, Immediate(2)); // used > 0, Smi. R8 = used + 1, round up. | 733 __ addq(R8, Immediate(2)); // used > 0, Smi. R8 = used + 1, round up. |
| 759 __ sarq(R8, Immediate(2)); // R8 = number of digit pairs to process. | 734 __ sarq(R8, Immediate(2)); // R8 = number of digit pairs to process. |
| 760 __ movq(RSI, Address(RSP, 3 * kWordSize)); // a_digits | 735 __ movq(RSI, Address(RSP, 3 * kWordSize)); // a_digits |
| (...skipping 25 matching lines...) Expand all Loading... |
| 786 __ Bind(&carry_loop); | 761 __ Bind(&carry_loop); |
| 787 // Loop (used+1)/2 - (a_used+1)/2 times, R8 > 0. | 762 // Loop (used+1)/2 - (a_used+1)/2 times, R8 > 0. |
| 788 __ movq(RAX, FieldAddress(RDI, RDX, TIMES_8, TypedData::data_offset())); | 763 __ movq(RAX, FieldAddress(RDI, RDX, TIMES_8, TypedData::data_offset())); |
| 789 __ adcq(RAX, Immediate(0)); | 764 __ adcq(RAX, Immediate(0)); |
| 790 __ movq(FieldAddress(RBX, RDX, TIMES_8, TypedData::data_offset()), RAX); | 765 __ movq(FieldAddress(RBX, RDX, TIMES_8, TypedData::data_offset()), RAX); |
| 791 __ incq(RDX); // Does not affect carry flag. | 766 __ incq(RDX); // Does not affect carry flag. |
| 792 __ decq(R8); // Does not affect carry flag. | 767 __ decq(R8); // Does not affect carry flag. |
| 793 __ j(NOT_ZERO, &carry_loop, Assembler::kNearJump); | 768 __ j(NOT_ZERO, &carry_loop, Assembler::kNearJump); |
| 794 | 769 |
| 795 __ Bind(&last_carry); | 770 __ Bind(&last_carry); |
| 796 __ movq(RAX, Immediate(0)); | 771 Label done; |
| 797 __ adcq(RAX, Immediate(0)); | 772 __ j(NOT_CARRY, &done); |
| 798 __ movq(FieldAddress(RBX, RDX, TIMES_8, TypedData::data_offset()), RAX); | 773 __ movq(FieldAddress(RBX, RDX, TIMES_8, TypedData::data_offset()), |
| 774 Immediate(1)); |
| 799 | 775 |
| 776 __ Bind(&done); |
| 800 // Returning Object::null() is not required, since this method is private. | 777 // Returning Object::null() is not required, since this method is private. |
| 801 __ ret(); | 778 __ ret(); |
| 802 } | 779 } |
| 803 | 780 |
| 804 | 781 |
| 805 void Intrinsifier::Bigint_absSub(Assembler* assembler) { | 782 void Intrinsifier::Bigint_absSub(Assembler* assembler) { |
| 806 // static void _absSub(Uint32List digits, int used, | 783 // static void _absSub(Uint32List digits, int used, |
| 807 // Uint32List a_digits, int a_used, | 784 // Uint32List a_digits, int a_used, |
| 808 // Uint32List r_digits) | 785 // Uint32List r_digits) |
| 809 | 786 |
| (...skipping 1124 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 1934 // Set return value to Isolate::current_tag_. | 1911 // Set return value to Isolate::current_tag_. |
| 1935 __ movq(RAX, Address(RBX, Isolate::current_tag_offset())); | 1912 __ movq(RAX, Address(RBX, Isolate::current_tag_offset())); |
| 1936 __ ret(); | 1913 __ ret(); |
| 1937 } | 1914 } |
| 1938 | 1915 |
| 1939 #undef __ | 1916 #undef __ |
| 1940 | 1917 |
| 1941 } // namespace dart | 1918 } // namespace dart |
| 1942 | 1919 |
| 1943 #endif // defined TARGET_ARCH_X64 | 1920 #endif // defined TARGET_ARCH_X64 |
| OLD | NEW |