d0p1/tcc-stupidos
1
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

A lrint functions in win32/include/math.h are rewrittem because tcc can't handle "t" constraint

Browse source
This commit is contained in:
seyko 2015-03-03 22:38:31 +03:00
parent dfbb00c106
commit 4b61f7f04b
1 changed files with 30 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

45
win32/include/math.h
View file

@ -515,21 +515,30 @@ extern "C" {
__CRT_INLINE double __cdecl rint (double x) __CRT_INLINE double __cdecl rint (double x)
{ {
double retval; double retval;
__asm__ ("frndint;": "=t" (retval) : "0" (x)); __asm__ (
"fldl %1\n"
"frndint \n"
"fstl %0\n" : "=m" (retval) : "m" (x));
return retval; return retval;
} }
__CRT_INLINE float __cdecl rintf (float x) __CRT_INLINE float __cdecl rintf (float x)
{ {
float retval; float retval;
__asm__ ("frndint;" : "=t" (retval) : "0" (x) ); __asm__ (
"flds %1\n"
"frndint \n"
"fsts %0\n" : "=m" (retval) : "m" (x));
return retval; return retval;
} }
__CRT_INLINE long double __cdecl rintl (long double x) __CRT_INLINE long double __cdecl rintl (long double x)
{ {
long double retval; long double retval;
__asm__ ("frndint;" : "=t" (retval) : "0" (x) ); __asm__ (
"fldt %1\n"
"frndint \n"
"fstt %0\n" : "=m" (retval) : "m" (x));
return retval; return retval;
} }
@ -537,48 +546,54 @@ extern "C" {
__CRT_INLINE long __cdecl lrint (double x) __CRT_INLINE long __cdecl lrint (double x)
{ {
long retval; long retval;
__asm__ __volatile__ \ __asm__ __volatile__ \
("fistpl %0" : "=m" (retval) : "t" (x) : "st"); \ ("fldl %1\n" \
"fistpl %0" : "=m" (retval) : "m" (x)); \
return retval; return retval;
} }
__CRT_INLINE long __cdecl lrintf (float x) __CRT_INLINE long __cdecl lrintf (float x)
{ {
long retval; long retval;
__asm__ __volatile__ \ __asm__ __volatile__ \
("fistpl %0" : "=m" (retval) : "t" (x) : "st"); \ ("flds %1\n" \
"fistpl %0" : "=m" (retval) : "m" (x)); \
return retval; return retval;
} }
__CRT_INLINE long __cdecl lrintl (long double x) __CRT_INLINE long __cdecl lrintl (long double x)
{ {
long retval; long retval;
__asm__ __volatile__ \ __asm__ __volatile__ \
("fistpl %0" : "=m" (retval) : "t" (x) : "st"); \ ("fldt %1\n" \
"fistpl %0" : "=m" (retval) : "m" (x)); \
return retval; return retval;
} }
__CRT_INLINE long long __cdecl llrint (double x) __CRT_INLINE long long __cdecl llrint (double x)
{ {
long long retval; long long retval;
__asm__ __volatile__ \ __asm__ __volatile__ \
("fistpll %0" : "=m" (retval) : "t" (x) : "st"); \ ("fldl %1\n" \
"fistpll %0" : "=m" (retval) : "m" (x)); \
return retval; return retval;
} }
__CRT_INLINE long long __cdecl llrintf (float x) __CRT_INLINE long long __cdecl llrintf (float x)
{ {
long long retval; long long retval;
__asm__ __volatile__ \ __asm__ __volatile__ \
("fistpll %0" : "=m" (retval) : "t" (x) : "st"); \ ("flds %1\n" \
"fistpll %0" : "=m" (retval) : "m" (x)); \
return retval; return retval;
} }
__CRT_INLINE long long __cdecl llrintl (long double x) __CRT_INLINE long long __cdecl llrintl (long double x)
{ {
long long retval; long long retval;
__asm__ __volatile__ \ __asm__ __volatile__ \
("fistpll %0" : "=m" (retval) : "t" (x) : "st"); \ ("fldt %1\n" \
"fistpll %0" : "=m" (retval) : "m" (x)); \
return retval; return retval;
} }