diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/vm_x64.dasc | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/vm_x64.dasc b/src/vm_x64.dasc index bba89aaf..ad50fa18 100644 --- a/src/vm_x64.dasc +++ b/src/vm_x64.dasc | |||
| @@ -1804,7 +1804,11 @@ static void build_subroutines(BuildCtx *ctx) | |||
| 1804 | | jmp ->fff_res1 | 1804 | | jmp ->fff_res1 |
| 1805 | | | 1805 | | |
| 1806 | |.ffunc_n math_frexp | 1806 | |.ffunc_n math_frexp |
| 1807 | |.if X64WIN | ||
| 1808 | | lea CARG2, TMP1 | ||
| 1809 | |.else | ||
| 1807 | | lea CARG1, TMP1 | 1810 | | lea CARG1, TMP1 |
| 1811 | |.endif | ||
| 1808 | | mov RB, BASE | 1812 | | mov RB, BASE |
| 1809 | | call extern frexp | 1813 | | call extern frexp |
| 1810 | | mov BASE, RB | 1814 | | mov BASE, RB |
| @@ -1822,7 +1826,11 @@ static void build_subroutines(BuildCtx *ctx) | |||
| 1822 | | jmp ->fff_res | 1826 | | jmp ->fff_res |
| 1823 | | | 1827 | | |
| 1824 | |.ffunc_n math_modf | 1828 | |.ffunc_n math_modf |
| 1829 | |.if X64WIN | ||
| 1830 | | lea CARG2, [BASE-16] | ||
| 1831 | |.else | ||
| 1825 | | lea CARG1, [BASE-16] | 1832 | | lea CARG1, [BASE-16] |
| 1833 | |.endif | ||
| 1826 | | mov PC, [BASE-8] | 1834 | | mov PC, [BASE-8] |
| 1827 | | mov RB, BASE | 1835 | | mov RB, BASE |
| 1828 | | call extern modf | 1836 | | call extern modf |