Rev 4908 | Rev 4910 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 4908 | Rev 4909 | ||
|---|---|---|---|
| Line 103... | Line 103... | ||
| 103 | ; initialize process heap |
103 | ; initialize process heap |
| 104 | mcall 68, 11 |
104 | mcall 68, 11 |
| Line 105... | Line 105... | ||
| 105 | 105 | ||
| 106 | push eax |
106 | push eax |
| - | 107 | fstcw word [esp] |
|
| - | 108 | pop eax |
|
| 107 | fstcw word [esp] |
109 | and ax, not (3 shl 10) |
| - | 110 | or ax, 1 shl 10 ; set round-to-minus infinity mode |
|
| 108 | or word [esp], 3 shl 10 ; set round-to-zero mode |
111 | push eax |
| 109 | fldcw word [esp] |
112 | fldcw word [esp] |
| Line 110... | Line 113... | ||
| 110 | pop eax |
113 | pop eax |
| 111 | 114 | ||
| Line 732... | Line 735... | ||
| 732 | stosd |
735 | stosd |
| 733 | stosd |
736 | stosd |
| 734 | stosd |
737 | stosd |
| 735 | stosd |
738 | stosd |
| Line -... | Line 739... | ||
| - | 739 | ||
| - | 740 | ;int3 |
|
| - | 741 | ;nop |
|
| 736 | 742 | ||
| 737 | mov edx, ebp |
743 | mov edx, ebp |
| Line 738... | Line 744... | ||
| 738 | shl edx, 4 |
744 | shl edx, 4 |
| 739 | 745 | ||
| Line 768... | Line 774... | ||
| 768 | 774 | ||
| 769 | mov dword [.str_buf], ' 0.0' |
775 | mov dword [.str_buf], ' 0.0' |
| Line 770... | Line 776... | ||
| 770 | jmp .display |
776 | jmp .display |
| 771 | - | ||
| 772 | .decode: |
777 | |
| 773 | 778 | .decode: |
|
| 774 | fld tword [_st0+edx] |
779 | fld tword [_st0+edx] |
| 775 | fldlg2 |
780 | fldlg2 |
| 776 | fld tword [_st0+edx] |
781 | fld tword [_st0+edx] |
| Line 781... | Line 786... | ||
| 781 | fyl2x |
786 | fyl2x |
| 782 | frndint |
787 | frndint |
| 783 | fist dword [.exp_v] |
788 | fist dword [.exp_v] |
| 784 | fld st0 |
789 | fld st0 |
| 785 | fbstp tword [.bcd_exp] |
790 | fbstp tword [.bcd_exp] |
| - | 791 | push 8 |
|
| - | 792 | fisub dword [esp] |
|
| - | 793 | pop eax |
|
| 786 | fldl2t |
794 | fldl2t |
| 787 | fmulp |
795 | fmulp |
| 788 | fld st0 |
796 | fld st0 |
| 789 | frndint |
797 | frndint |
| 790 | fxch |
798 | fxch |
| Line 794... | Line 802... | ||
| 794 | fld1 |
802 | fld1 |
| 795 | faddp |
803 | faddp |
| 796 | fscale |
804 | fscale |
| 797 | fstp st1 |
805 | fstp st1 |
| 798 | fdivp |
806 | fdivp |
| 799 | fimul dword [_10000000] |
- | |
| 800 | fbstp tword [.bcd_man] |
807 | fbstp tword [.bcd_man] |
| Line 801... | Line 808... | ||
| 801 | 808 | ||
| 802 | lea esi, [.bcd_man-1] |
809 | lea esi, [.bcd_man-1] |