diff options
author | Ulrich Drepper <drepper@redhat.com> | 2001-02-18 19:52:52 +0000 |
---|---|---|
committer | Ulrich Drepper <drepper@redhat.com> | 2001-02-18 19:52:52 +0000 |
commit | e208f556cad11f729533385e46e4191fcc49aa0a (patch) | |
tree | 7313b0ca2c1bc399228dc93c04a3b23fd072ee65 /sysdeps/i386 | |
parent | 3667c08816a6e43e2d41f6bcc58f17ad4f86b911 (diff) | |
download | glibc-e208f556cad11f729533385e46e4191fcc49aa0a.zip glibc-e208f556cad11f729533385e46e4191fcc49aa0a.tar.gz glibc-e208f556cad11f729533385e46e4191fcc49aa0a.tar.bz2 |
Update.
2001-02-18 Ulrich Drepper <drepper@redhat.com>
* math/libm-test.inc (scalb_test): Require invalid exception being
raised for invalid parameters.
* sysdeps/i386/fpu/e_scalb.S: Raise invalid exception if necessary.
* sysdeps/i386/fpu/e_scalbf.S: Likewise.
* sysdeps/i386/fpu/e_scalbl.S: Likewise.
Diffstat (limited to 'sysdeps/i386')
-rw-r--r-- | sysdeps/i386/fpu/e_scalb.S | 10 | ||||
-rw-r--r-- | sysdeps/i386/fpu/e_scalbf.S | 10 | ||||
-rw-r--r-- | sysdeps/i386/fpu/e_scalbl.S | 10 |
3 files changed, 27 insertions, 3 deletions
diff --git a/sysdeps/i386/fpu/e_scalb.S b/sysdeps/i386/fpu/e_scalb.S index f463002..1596f6a 100644 --- a/sysdeps/i386/fpu/e_scalb.S +++ b/sysdeps/i386/fpu/e_scalb.S @@ -56,7 +56,7 @@ ENTRY(__ieee754_scalb) fcomp %st(2) fnstsw sahf - jne 2f + jne 4f fscale fstp %st(1) ret @@ -75,6 +75,7 @@ ENTRY(__ieee754_scalb) fstp %st andl $0x80000000, %edx andl $8, %eax + jnz 4f shrl $27, %edx addl %edx, %eax fldl MOX(zero_nan, %eax, 1) @@ -95,4 +96,11 @@ ENTRY(__ieee754_scalb) /* The first parameter is a NaN. Return it. */ 3: fstp %st(1) ret + + /* Return NaN and raise the invalid exception. */ +4: fstp %st + fstp %st + fldz + fdiv %st + ret END(__ieee754_scalb) diff --git a/sysdeps/i386/fpu/e_scalbf.S b/sysdeps/i386/fpu/e_scalbf.S index 4b5b0d0..d41c293 100644 --- a/sysdeps/i386/fpu/e_scalbf.S +++ b/sysdeps/i386/fpu/e_scalbf.S @@ -58,7 +58,7 @@ ENTRY(__ieee754_scalbf) fcomp %st(2) fnstsw sahf - jne 2f + jne 4f fscale fstp %st(1) ret @@ -77,6 +77,7 @@ ENTRY(__ieee754_scalbf) fstp %st andl $0x80000000, %edx andl $8, %eax + jnz 4f shrl $27, %edx addl %edx, %eax fldl MOX(zero_nan, %eax, 1) @@ -97,4 +98,11 @@ ENTRY(__ieee754_scalbf) /* The first parameter is a NaN. Return it. */ 3: fstp %st(1) ret + + /* Return NaN and raise the invalid exception. */ +4: fstp %st + fstp %st + fldz + fdiv %st + ret END(__ieee754_scalbf) diff --git a/sysdeps/i386/fpu/e_scalbl.S b/sysdeps/i386/fpu/e_scalbl.S index e8166fa..65644f8 100644 --- a/sysdeps/i386/fpu/e_scalbl.S +++ b/sysdeps/i386/fpu/e_scalbl.S @@ -58,7 +58,7 @@ ENTRY(__ieee754_scalbl) fcomp %st(2) fnstsw sahf - jne 2f + jne 4f fscale fstp %st(1) ret @@ -77,6 +77,7 @@ ENTRY(__ieee754_scalbl) fstp %st andl $0x8000, %edx andl $8, %eax + jnz 4f shrl $11, %edx addl %edx, %eax fldl MOX(zero_nan, %eax, 1) @@ -97,4 +98,11 @@ ENTRY(__ieee754_scalbl) /* The first parameter is a NaN. Return it. */ 3: fstp %st(1) ret + + /* Return NaN and raise the invalid exception. */ +4: fstp %st + fstp %st + fldz + fdiv %st + ret END(__ieee754_scalbl) |