mirror of
https://git.code.sf.net/p/mingw-w64/mingw-w64
synced 2025-04-18 17:44:18 +03:00
8a67ab4541
Also replace 'This file is a part of' by 'This file is part of' for consistency git-svn-id: svn+ssh://svn.code.sf.net/p/mingw-w64/code/trunk@5147 4407c894-4637-0410-b4f5-ada5f102cad1
47 lines
959 B
ArmAsm
47 lines
959 B
ArmAsm
/**
|
|
* This file has no copyright assigned and is placed in the Public Domain.
|
|
* This file is part of the mingw-w64 runtime package.
|
|
* No warranty is given; refer to the file DISCLAIMER.PD within this package.
|
|
*
|
|
* IEEE 854 double-extended-precision format
|
|
* unsigned int mantissa1:32
|
|
* unsigned int mantissa0:32
|
|
* unsigned int exponent:15
|
|
* unsigned int negative:1
|
|
* unsigned int empty:16
|
|
*
|
|
* long double _chgsignl(long double x) {
|
|
* ((unsigned int *) &x)[2] ^= 0x00008000;
|
|
* return x;
|
|
* }
|
|
*/
|
|
|
|
#include <_mingw_mac.h>
|
|
|
|
.file "_chgignl.S"
|
|
.text
|
|
#ifdef _WIN64
|
|
.align 8
|
|
#else
|
|
.align 4
|
|
#endif
|
|
.globl __MINGW_USYMBOL(_chgsignl)
|
|
.def __MINGW_USYMBOL(_chgsignl); .scl 2; .type 32; .endef
|
|
__MINGW_USYMBOL(_chgsignl):
|
|
#ifdef _WIN64
|
|
movq (%rdx), %rax
|
|
movq 8(%rdx), %rdx
|
|
xorq $0x8000, %rdx
|
|
movq %rax, (%rcx)
|
|
movq %rdx, 8(%rcx)
|
|
movq %rcx, %rax
|
|
ret
|
|
#else
|
|
movl 12(%esp),%eax
|
|
xorl $0x8000,%eax
|
|
movl %eax,12(%esp)
|
|
fldt 4(%esp)
|
|
ret
|
|
#endif
|
|
|