-
Notifications
You must be signed in to change notification settings - Fork 0
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
* sysdeps/powerpc/powerpc32/power5/fpu/s_isnan.S: New file.
* sysdeps/powerpc/powerpc32/power5/fpu/s_isnanf.S: New file. * sysdeps/powerpc/powerpc32/power6/fpu/s_isnan.S: New file. * sysdeps/powerpc/powerpc32/power6/fpu/s_isnanf.S: New file. * sysdeps/powerpc/powerpc64/power5/fpu/s_isnan.S: New file. * sysdeps/powerpc/powerpc64/power6/fpu/s_isnan.S: New file. * sysdeps/powerpc/powerpc64/power6x/fpu/s_isnan.S: New file.
- Loading branch information
Ulrich Drepper
committed
Apr 10, 2008
1 parent
9fb11d4
commit 3b32d8a
Showing
9 changed files
with
353 additions
and
1 deletion.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,62 @@ | ||
/* isnan(). PowerPC32 version. | ||
Copyright (C) 2008 Free Software Foundation, Inc. | ||
This file is part of the GNU C Library. | ||
The GNU C Library is free software; you can redistribute it and/or | ||
modify it under the terms of the GNU Lesser General Public | ||
License as published by the Free Software Foundation; either | ||
version 2.1 of the License, or (at your option) any later version. | ||
The GNU C Library is distributed in the hope that it will be useful, | ||
but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | ||
Lesser General Public License for more details. | ||
You should have received a copy of the GNU Lesser General Public | ||
License along with the GNU C Library; if not, write to the Free | ||
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA | ||
02111-1307 USA. */ | ||
|
||
#include <sysdep.h> | ||
#include <math_ldbl_opt.h> | ||
|
||
/* int __isnan(x) */ | ||
.machine power5 | ||
EALIGN (__isnan, 4, 0) | ||
stwu r1,-32(r1) | ||
cfi_adjust_cfa_offset (32) | ||
ori r1,r1,0 | ||
stfd fp1,24(r1) /* copy FPR to GPR */ | ||
ori r1,r1,0 | ||
lwz r4,24(r1) | ||
lwz r5,28(r1) | ||
lis r0,0x7ff0 /* const long r0 0x7ff00000 00000000 */ | ||
clrlwi r4,r4,1 /* x = fabs(x) */ | ||
cmpw cr7,r4,r0 /* if (fabs(x) =< inf) */ | ||
cmpwi cr6,r5,0 | ||
li r3,0 /* then return 0 */ | ||
addi r1,r1,32 | ||
cfi_adjust_cfa_offset (-32) | ||
bltlr+ cr7 | ||
bgt- cr7,L(NaN) | ||
beqlr+ cr6 | ||
L(NaN): | ||
li r3,1 /* else return 1 */ | ||
blr | ||
END (__isnan) | ||
|
||
hidden_def (__isnan) | ||
weak_alias (__isnan, isnan) | ||
|
||
#ifdef NO_LONG_DOUBLE | ||
strong_alias (__isnan, __isnanl) | ||
weak_alias (__isnan, isnanl) | ||
#endif | ||
|
||
#ifndef IS_IN_libm | ||
# if LONG_DOUBLE_COMPAT(libc, GLIBC_2_0) | ||
compat_symbol (libc, __isnan, __isnanl, GLIBC_2_0); | ||
compat_symbol (libc, isnan, isnanl, GLIBC_2_0); | ||
# endif | ||
#endif | ||
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,46 @@ | ||
/* isnan(). PowerPC32 version. | ||
Copyright (C) 2008 Free Software Foundation, Inc. | ||
This file is part of the GNU C Library. | ||
The GNU C Library is free software; you can redistribute it and/or | ||
modify it under the terms of the GNU Lesser General Public | ||
License as published by the Free Software Foundation; either | ||
version 2.1 of the License, or (at your option) any later version. | ||
The GNU C Library is distributed in the hope that it will be useful, | ||
but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | ||
Lesser General Public License for more details. | ||
You should have received a copy of the GNU Lesser General Public | ||
License along with the GNU C Library; if not, write to the Free | ||
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA | ||
02111-1307 USA. */ | ||
|
||
#include <sysdep.h> | ||
#include <math_ldbl_opt.h> | ||
|
||
/* int __isnanf(x) */ | ||
.machine power5 | ||
EALIGN (__isnanf, 4, 0) | ||
stwu r1,-32(r1) | ||
cfi_adjust_cfa_offset (32) | ||
stfs fp1,28(r1) /* copy FPR to GPR */ | ||
nop | ||
nop | ||
lwz r4,28(r1) | ||
lis r0,0x7f80 /* const long r0 0x7f800000 */ | ||
clrlwi r4,r4,1 /* x = fabs(x) */ | ||
cmpw cr7,r4,r0 /* if (fabs(x) =< inf) */ | ||
li r3,0 /* then return 0 */ | ||
addi r1,r1,32 | ||
cfi_adjust_cfa_offset (-32) | ||
blelr+ cr7 | ||
L(NaN): | ||
li r3,1 /* else return 1 */ | ||
blr | ||
END (__isnanf) | ||
|
||
hidden_def (__isnanf) | ||
weak_alias (__isnanf, isnanf) | ||
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,62 @@ | ||
/* isnan(). PowerPC32 version. | ||
Copyright (C) 2008 Free Software Foundation, Inc. | ||
This file is part of the GNU C Library. | ||
The GNU C Library is free software; you can redistribute it and/or | ||
modify it under the terms of the GNU Lesser General Public | ||
License as published by the Free Software Foundation; either | ||
version 2.1 of the License, or (at your option) any later version. | ||
The GNU C Library is distributed in the hope that it will be useful, | ||
but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | ||
Lesser General Public License for more details. | ||
You should have received a copy of the GNU Lesser General Public | ||
License along with the GNU C Library; if not, write to the Free | ||
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA | ||
02111-1307 USA. */ | ||
|
||
#include <sysdep.h> | ||
#include <math_ldbl_opt.h> | ||
|
||
/* int __isnan(x) */ | ||
.machine power6 | ||
EALIGN (__isnan, 4, 0) | ||
stwu r1,-32(r1) | ||
cfi_adjust_cfa_offset (32) | ||
ori r1,r1,0 | ||
stfd fp1,24(r1) /* copy FPR to GPR */ | ||
ori r1,r1,0 | ||
lwz r4,24(r1) | ||
lwz r5,28(r1) | ||
lis r0,0x7ff0 /* const long r0 0x7ff00000 00000000 */ | ||
clrlwi r4,r4,1 /* x = fabs(x) */ | ||
cmpw cr7,r4,r0 /* if (fabs(x) =< inf) */ | ||
cmpwi cr6,r5,0 | ||
li r3,0 /* then return 0 */ | ||
addi r1,r1,32 | ||
cfi_adjust_cfa_offset (-32) | ||
bltlr+ cr7 | ||
bgt- cr7,L(NaN) | ||
beqlr+ cr6 | ||
L(NaN): | ||
li r3,1 /* else return 1 */ | ||
blr | ||
END (__isnan) | ||
|
||
hidden_def (__isnan) | ||
weak_alias (__isnan, isnan) | ||
|
||
#ifdef NO_LONG_DOUBLE | ||
strong_alias (__isnan, __isnanl) | ||
weak_alias (__isnan, isnanl) | ||
#endif | ||
|
||
#ifndef IS_IN_libm | ||
# if LONG_DOUBLE_COMPAT(libc, GLIBC_2_0) | ||
compat_symbol (libc, __isnan, __isnanl, GLIBC_2_0); | ||
compat_symbol (libc, isnan, isnanl, GLIBC_2_0); | ||
# endif | ||
#endif | ||
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,46 @@ | ||
/* isnanf(). PowerPC32 version. | ||
Copyright (C) 2008 Free Software Foundation, Inc. | ||
This file is part of the GNU C Library. | ||
The GNU C Library is free software; you can redistribute it and/or | ||
modify it under the terms of the GNU Lesser General Public | ||
License as published by the Free Software Foundation; either | ||
version 2.1 of the License, or (at your option) any later version. | ||
The GNU C Library is distributed in the hope that it will be useful, | ||
but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | ||
Lesser General Public License for more details. | ||
You should have received a copy of the GNU Lesser General Public | ||
License along with the GNU C Library; if not, write to the Free | ||
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA | ||
02111-1307 USA. */ | ||
|
||
#include <sysdep.h> | ||
#include <math_ldbl_opt.h> | ||
|
||
/* int __isnanf(x) */ | ||
.machine power6 | ||
EALIGN (__isnanf, 4, 0) | ||
stwu r1,-32(r1) | ||
cfi_adjust_cfa_offset (32) | ||
ori r1,r1,0 | ||
stfs fp1,24(r1) /* copy FPR to GPR */ | ||
ori r1,r1,0 | ||
lwz r4,24(r1) | ||
lis r0,0x7f80 /* const long r0 0x7f800000 */ | ||
clrlwi r4,r4,1 /* x = fabs(x) */ | ||
cmpw cr7,r4,r0 /* if (fabs(x) =< inf) */ | ||
li r3,0 /* then return 0 */ | ||
addi r1,r1,32 | ||
cfi_adjust_cfa_offset (-32) | ||
blelr+ cr7 | ||
L(NaN): | ||
li r3,1 /* else return 1 */ | ||
blr | ||
END (__isnan) | ||
|
||
hidden_def (__isnanf) | ||
weak_alias (__isnanf, isnanf) | ||
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,61 @@ | ||
/* isnan(). PowerPC64 version. | ||
Copyright (C) 2008 Free Software Foundation, Inc. | ||
This file is part of the GNU C Library. | ||
The GNU C Library is free software; you can redistribute it and/or | ||
modify it under the terms of the GNU Lesser General Public | ||
License as published by the Free Software Foundation; either | ||
version 2.1 of the License, or (at your option) any later version. | ||
The GNU C Library is distributed in the hope that it will be useful, | ||
but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | ||
Lesser General Public License for more details. | ||
You should have received a copy of the GNU Lesser General Public | ||
License along with the GNU C Library; if not, write to the Free | ||
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA | ||
02111-1307 USA. */ | ||
|
||
#include <sysdep.h> | ||
#include <math_ldbl_opt.h> | ||
|
||
/* int __isnan(x) */ | ||
.machine power5 | ||
EALIGN (__isnan, 4, 0) | ||
CALL_MCOUNT 0 | ||
stfd fp1,-8(r1) /* copy FPR to GPR */ | ||
lis r0,0x7ff0 | ||
nop /* insure the following is in a different */ | ||
nop /* dispatch group */ | ||
ld r4,-8(r1) | ||
sldi r0,r0,32 /* const long r0 0x7ff00000 00000000 */ | ||
clrldi r4,r4,1 /* x = fabs(x) */ | ||
cmpd cr7,r4,r0 /* if (fabs(x) <= inf) */ | ||
li r3,0 /* then return 0 */ | ||
blelr+ cr7 | ||
li r3,1 /* else return 1 */ | ||
blr | ||
END (__isnan) | ||
|
||
hidden_def (__isnan) | ||
weak_alias (__isnan, isnan) | ||
|
||
/* It turns out that the 'double' version will also always work for | ||
single-precision. */ | ||
strong_alias (__isnan, __isnanf) | ||
hidden_def (__isnanf) | ||
weak_alias (__isnanf, isnanf) | ||
|
||
#ifdef NO_LONG_DOUBLE | ||
strong_alias (__isnan, __isnanl) | ||
weak_alias (__isnan, isnanl) | ||
#endif | ||
|
||
#ifndef IS_IN_libm | ||
# if LONG_DOUBLE_COMPAT(libc, GLIBC_2_0) | ||
compat_symbol (libc, __isnan, __isnanl, GLIBC_2_0); | ||
compat_symbol (libc, isnan, isnanl, GLIBC_2_0); | ||
# endif | ||
#endif | ||
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,60 @@ | ||
/* isnan(). PowerPC64 version. | ||
Copyright (C) 2008 Free Software Foundation, Inc. | ||
This file is part of the GNU C Library. | ||
The GNU C Library is free software; you can redistribute it and/or | ||
modify it under the terms of the GNU Lesser General Public | ||
License as published by the Free Software Foundation; either | ||
version 2.1 of the License, or (at your option) any later version. | ||
The GNU C Library is distributed in the hope that it will be useful, | ||
but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | ||
Lesser General Public License for more details. | ||
You should have received a copy of the GNU Lesser General Public | ||
License along with the GNU C Library; if not, write to the Free | ||
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA | ||
02111-1307 USA. */ | ||
|
||
#include <sysdep.h> | ||
#include <math_ldbl_opt.h> | ||
|
||
/* int __isnan(x) */ | ||
.machine power6 | ||
EALIGN (__isnan, 4, 0) | ||
CALL_MCOUNT 0 | ||
stfd fp1,-8(r1) /* copy FPR to GPR */ | ||
ori r1,r1,0 | ||
ld r4,-8(r1) | ||
lis r0,0x7ff0 | ||
sldi r0,r0,32 /* const long r0 0x7ff00000 00000000 */ | ||
clrldi r4,r4,1 /* x = fabs(x) */ | ||
cmpd cr7,r4,r0 /* if (fabs(x) <= inf) */ | ||
li r3,0 /* then return 0 */ | ||
blelr+ cr7 | ||
li r3,1 /* else return 1 */ | ||
blr | ||
END (__isnan) | ||
|
||
hidden_def (__isnan) | ||
weak_alias (__isnan, isnan) | ||
|
||
/* It turns out that the 'double' version will also always work for | ||
single-precision. */ | ||
strong_alias (__isnan, __isnanf) | ||
hidden_def (__isnanf) | ||
weak_alias (__isnanf, isnanf) | ||
|
||
#ifdef NO_LONG_DOUBLE | ||
strong_alias (__isnan, __isnanl) | ||
weak_alias (__isnan, isnanl) | ||
#endif | ||
|
||
#ifndef IS_IN_libm | ||
# if LONG_DOUBLE_COMPAT(libc, GLIBC_2_0) | ||
compat_symbol (libc, __isnan, __isnanl, GLIBC_2_0); | ||
compat_symbol (libc, isnan, isnanl, GLIBC_2_0); | ||
# endif | ||
#endif | ||
|