summaryrefslogtreecommitdiffstats
path: root/winsup/mingw/mingwex/math/nearbyint.S
diff options
context:
space:
mode:
Diffstat (limited to 'winsup/mingw/mingwex/math/nearbyint.S')
-rw-r--r--winsup/mingw/mingwex/math/nearbyint.S30
1 files changed, 30 insertions, 0 deletions
diff --git a/winsup/mingw/mingwex/math/nearbyint.S b/winsup/mingw/mingwex/math/nearbyint.S
new file mode 100644
index 000000000..9730aeebf
--- /dev/null
+++ b/winsup/mingw/mingwex/math/nearbyint.S
@@ -0,0 +1,30 @@
+/*
+ * Written by J.T. Conklin <jtc@netbsd.org>.
+ * Public domain.
+ *
+ * Adapted for use as nearbyint by Ulrich Drepper <drepper@cygnus.com>.
+ *
+ * Removed header file dependency for use in libmingwex.a by
+ * Danny Smith <dannysmith@users.sourceforge.net>
+ */
+
+ .file "nearbyint.S"
+ .text
+ .align 4
+.globl _nearbyint
+ .def _nearbyint; .scl 2; .type 32; .endef
+_nearbyint:
+ fldl 4(%esp)
+ pushl %eax
+ pushl %ecx
+ fnstcw (%esp)
+ movl (%esp), %eax
+ orl $0x20, %eax
+ movl %eax, 4(%esp)
+ fldcw 4(%esp)
+ frndint
+ fclex
+ fldcw (%esp)
+ popl %ecx
+ popl %eax
+ ret