aboutsummaryrefslogtreecommitdiffstats
path: root/testfloat/386-Win32-gcc/systflags.S
diff options
context:
space:
mode:
authorMarius Strobl <marius@FreeBSD.org>2010-04-20 20:47:58 +0000
committerMarius Strobl <marius@FreeBSD.org>2010-04-20 20:47:58 +0000
commit2669f95457b9136a7c9fa78e879cc53f68799078 (patch)
tree008bd766a310a0d9d6236ccda7937063e4aeaf57 /testfloat/386-Win32-gcc/systflags.S
downloadsrc-vendor/testfloat.tar.gz
src-vendor/testfloat.zip
Initial import of TestFloat 2a.vendor/testfloat/2avendor/testfloat
Notes
Notes: svn path=/vendor/testfloat/; revision=206917 svn path=/vendor/testfloat/2a/; revision=206923; tag=vendor/testfloat/2a
Diffstat (limited to 'testfloat/386-Win32-gcc/systflags.S')
-rw-r--r--testfloat/386-Win32-gcc/systflags.S41
1 files changed, 41 insertions, 0 deletions
diff --git a/testfloat/386-Win32-gcc/systflags.S b/testfloat/386-Win32-gcc/systflags.S
new file mode 100644
index 000000000000..b338e54be820
--- /dev/null
+++ b/testfloat/386-Win32-gcc/systflags.S
@@ -0,0 +1,41 @@
+
+/*
+===============================================================================
+
+This GNU assembler source file is part of TestFloat, Release 2a, a package
+of programs for testing the correctness of floating-point arithmetic
+complying to the IEC/IEEE Standard for Floating-Point.
+
+Written by John R. Hauser. More information is available through the Web
+page `http://HTTP.CS.Berkeley.EDU/~jhauser/arithmetic/TestFloat.html'.
+
+THIS SOFTWARE IS DISTRIBUTED AS IS, FOR FREE. Although reasonable effort
+has been made to avoid it, THIS SOFTWARE MAY CONTAIN FAULTS THAT WILL AT
+TIMES RESULT IN INCORRECT BEHAVIOR. USE OF THIS SOFTWARE IS RESTRICTED TO
+PERSONS AND ORGANIZATIONS WHO CAN AND WILL TAKE FULL RESPONSIBILITY FOR ANY
+AND ALL LOSSES, COSTS, OR OTHER PROBLEMS ARISING FROM ITS USE.
+
+Derivative works are acceptable, even for commercial purposes, so long as
+(1) they include prominent notice that the work is derivative, and (2) they
+include prominent notice akin to these four paragraphs for those parts of
+this code that are retained.
+
+===============================================================================
+*/
+
+ .text
+
+/*
+-------------------------------------------------------------------------------
+Clears the system's IEC/IEEE floating-point exception flags. Returns the
+previous value of the flags.
+-------------------------------------------------------------------------------
+*/
+ .align 2
+.globl _syst_float_flags_clear
+_syst_float_flags_clear:
+ fnstsw %ax
+ fnclex
+ andl $61,%eax
+ ret
+