Browse Source

math: move x87-family fabs functions to C with inline asm

Alexander Monakov 5 years ago
parent
commit
c24a992386

+ 7 - 0
src/math/i386/fabs.c

@@ -0,0 +1,7 @@
+#include <math.h>
+
+double fabs(double x)
+{
+	__asm__ ("fabs" : "+t"(x));
+	return x;
+}

+ 0 - 6
src/math/i386/fabs.s

@@ -1,6 +0,0 @@
-.global fabs
-.type fabs,@function
-fabs:
-	fldl 4(%esp)
-	fabs
-	ret

+ 7 - 0
src/math/i386/fabsf.c

@@ -0,0 +1,7 @@
+#include <math.h>
+
+float fabsf(float x)
+{
+	__asm__ ("fabs" : "+t"(x));
+	return x;
+}

+ 0 - 6
src/math/i386/fabsf.s

@@ -1,6 +0,0 @@
-.global fabsf
-.type fabsf,@function
-fabsf:
-	flds 4(%esp)
-	fabs
-	ret

+ 7 - 0
src/math/i386/fabsl.c

@@ -0,0 +1,7 @@
+#include <math.h>
+
+long double fabsl(long double x)
+{
+	__asm__ ("fabs" : "+t"(x));
+	return x;
+}

+ 0 - 6
src/math/i386/fabsl.s

@@ -1,6 +0,0 @@
-.global fabsl
-.type fabsl,@function
-fabsl:
-	fldt 4(%esp)
-	fabs
-	ret

+ 7 - 0
src/math/x86_64/fabsl.c

@@ -0,0 +1,7 @@
+#include <math.h>
+
+long double fabsl(long double x)
+{
+	__asm__ ("fabs" : "+t"(x));
+	return x;
+}

+ 0 - 6
src/math/x86_64/fabsl.s

@@ -1,6 +0,0 @@
-.global fabsl
-.type fabsl,@function
-fabsl:
-	fldt 8(%rsp)
-	fabs
-	ret